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A la computadora personal 


Talents® 

nada le es imposible 



MSX es marca registrada de MICROSOFT CORPORATION 


UTIL 

Su poderoso sistema operativo MSX 
permite el acceso a todo tipo de 
procesamiento de datos: 

• Planillas de calculo. 

• Procesadores de palabra. 

• Graficosde negocios. 

• Bases de datos (d Base II. etc.) 

• Contabilidad general, sueldos. y 
jornales. costos. etc., desarrollados 
bajo CP/M en Basic. Coboi. Pascal o C. 

Con la posibilidad de conexion a linea 
telefonica permite la transferencia y 
consulta de datos entre computadoras 
personales. profesionales o bancosbe 
datos. 

La grabacion de archivos es en formato 
MS-DOS. haciendola compatible con las 
computadoras profesionales. 

DIDACTICA 

Dispone de tres lenguajes para la 
ensenanza de computacion: LOGO como 
lenguaje de induccion para los mas 
chicos. Lenguaje de Programacion en 
Castellano, para todos los que quieran 
aprender a programar sin conocimientos 
previos. Y Basic MSX como lenguaje 


profesional Mas una amplia variedad de 
perifericos como el Mouse. Lapiz Optico, 
Tableta gratica. Track-ball, etc. 

DIVERTIDA 

La mas genial para Video-Juegos. Por la 
amplisima biblioteca de programas 
-todos nuevos- de la norma MSX en el 
mundo. Y ademas. el Basic MSX permite 
al usuario generar sus propios juegos 
con un manejo tan simple, como solo 
TALENT MSX puede ofrecer. 

CARACTERISTICAS TECNICAS 

• Memoria principal 64 KB ampliable 
hasta 576 KB. 

• Memoria de video: 16 KB RAM. 

• ROM incorporada de 32 KB 
con el MSX-Basic de Microsoft. 

• Graficos completes. hasta 32 sprites 
y 16 colores simultaneos. 

• Generador de sonido de 3 voces 
y8octavas. 

• Conexion para cualquier grabador. 

• Interfaz para salida impresora paralela. 

• Conectores para cartuchos 
y expansiones. 

• Fuente para 220 V 

y modulador PAL-N incorporado. 


Porque gracias a la norma internacional MSX, la 
TALENT MSX trasciende sus propios limites. 

Hasta ahora, cuando usted compraba una 
computadora personal de cualquier marca, quedaba 
automaticamente desconectado del resto del mundo 
de la computacion. Porque los distintos equipos y 
sistemas no eran compatibles entre si. 

Hasta que dos grandes empresas de informatica, 
la Microsoft Corp. de EE.UU. y la ASCII del Japon se 
pusieron de acuerdo para crear una norma standard: 
la MSX. Que se expandio tambien rapidamente en 
Europa. Y que hoy TALENT presenta por primera vez 
en la Argentina. 

Mientras que la mayoria de las computadoras de su tipo 
que se ofrecen en el mercado nacional, han sido 
discontinuadas por obsoletas en sus lugares de origen, 
TALENT MSX tiene casi ilimitadas posibilidades 
de desarrollo. Porque la norma MSX es en todo el 
mundo inteligencia en crecimiento. 

La TALENT MSX pone a su disposicion un mundo de 
software para elegir. Y con la incorporacion de todos 
sus perifericos Mega a ser una autentica computadora 
profesional. 
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JUEGOS DE 
ESTRATEGIA 



Ante una jugada nuestra, la 
computadora responde con 
otra que puede ponernos en 
un aprieto o directamente 
vencernos. ^Pero como ha- 
ce la maquina para evaluar 
su tactica a seguir? (Pag. 6) 

RELOJ 

DIGITAL 



Con este recurso podremos 
utilizar la computadora con 
precision mas aceptable, 
tanto para medir la duracion 
de sucesos externos al siste- 
ma, como para cronometrar 
determinados aigoritmos 
que se encargan de tareas 
comunmente lerdas, tales 
como el ordenamiento de 
vectores y busquedas. (Pag. 
10 ) 

RINCON DEL 
USUARIO 


MSX Disk BASIC se podrfan 
resumir en uno solo: el ma- 
nual no especifica con un e- 
jemplo que englobe todo lo 
referente al tema y, si se 
quiere, no trae un curso so- 
bre el mismo. (Pag. 20) 

LA AVENTURA 
DEL PENSA- 
MIENTO 



El desarrollo de software re- 
quiere de un proceso de va- 
rias etapas. A traves de un e- 
jemplo, un programaque ha- 
ce graficos de barras, ofrece- 
mos las experiencias de un 
grupo de jovenes sobre el te- 
ma. (Pag. 26) 


LOS 

MISTERIOS 
DEL MSX-DOS 

(3ra. parte) 


Los ejempfares atrasados se venderin al 
precio del ultimo numero en circuUcidn. 
Prohibida la reproduccbn total o parcial de 
los materiales puMcados. por cualquier me- 
dio de reproduced grifko, auditivo o me- 
cinico, sin autorizacidn expresa de los edi- 
tores. Las menciones se realizan con fines 
informativos y t6cntcos, sin cargo alguno 
para las empresas que los comerciatizan y/o 
los representan. Al ser informativa su mi- 
yon, la revista no se re^onsabiliza por cual- 
quier proWema que pueda plantear la fabri- 
cacidn, del funcionamiento y/o aplicacion 
de los sistemas y los dhpositivos desenptos 
La responsaWidad de los artkutes firmados 
corresponde exdusvamente a sus autores. 
Distribuidor en Capital: Martino, Juan de 
Garay 358, P. B. Capital. 


Distribuidor interior: D G P: Hipolito Yri- 
goyen 1450. Capital Federal. T.E. 38-9266/ 
9800. 
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Los interrogates sobre el 
manejo de archivos desde el 


Seguimos investigando el 
MSX-DOS para poner luz so- 
bre esta importante herra- 



ANO 2 N 2 24 



mienta. Analizaremos el te- 
ma del control de archivos. 
(Pag. 28) 


PROGRAMAS 



Sueldos (Pag. 12) - Calculo 
de expectativa de vida (Pag. 
16) - Pasaje de unidades 
(Pag. 19) - Aprende solo 
(Pag. 25) 


SECCIONES 

FIJAS 



Noticias MSX (Pag. 4) - Sor- 
tilegios (Pag. 31 ) - Soft al df- 
a (Pag. 32) - Buzon (Pag. 34) 








O T I C I A S 


IMPRESORA 

SEIKOSHA 

SP-1000AS 

Esta impresora funciona en 
todas las computadoras con 
una interfase serie.Su as- 
pecto es rigido y “durable”. El 
panel de control que se ubica 
a la izquierda de la misma in- 


cluye todos los comandos 
habituales, mas uno extra, 
que nos permite poner a la 
impresora atrabajar en modo 
NLQ (Near Letter Quality), 
Este nos brinda una calidad 
de impresion comparable a la 
de una maquina de escribir. 
Otra caracteristica intere- 
sante es el sistema de trans- 
pose del papel. 
Elmismoincluyeuna bande- 
ja que se eleva para separar 
convenientemente el papel 
que entra a la impresora de a- 
quel que sale ya impreso. 

El cabezal de impresion po- 
see una regulation que nos 
permite acercarlo o alejarlo 
convenientemente de la ho- 
ja. 

La instalacion y remocion de 
los cartuchos de cinta es muy 
simple. 

Otra caracteristica inusual de 
este equipo esta relacionada 
con las funciones multiples 
de su teclado de control. 

Las teclas ON LINE, FORM 
FEED y LINE FEED son co- 
munes a todas las impreso- 
ras, y sus funciones son res- 
pectivamente poner a la im- 
presora en servicio, avanzar 
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una hoja completa de papel y 
avanzar una linea. 

Sin embargo, estas tres te- 
clas cumplen otra funcion im- 
portante que es la de estable- 
cer los mdrgenes de impre- 
sion. 

En cuanto a la interfase que 
equipa a este modelo, setra- 
ta de una version serie que 
cumple con el protocolo RS 
232. 

La velocidad de comunica- 
cion puede variar entre 1200 
y 9600 baudios, y es selec- 
cionable por 
medio de una 
serie de inte- 
rruptores que 
estan ocultos 
en la parte pos- 
terior de la im- 
presora. 

La impresora 
cuenta con 11 
versiones dis- 
tintas de carac- 
teres de acuer- 
do con el lenguaje en que 
queramos escribir. 

Estos lenguajes se seleccio- 
nan por medio de un juego de 
interruptores y no por codi- 
gos de control. 

En cuanto a la velocidad de 
impresion, tiene un maximo 
de lOOcaracteresporsegun- 
do. 

Sin embargo, esta velocidad 
disminuye notablemente en 
otros modos. 

La cantidad maxima de ca- 
racteres por linea es de 137, 
trabajando en modo conden- 
sado. 

Ademas del modo de carac- 
ter estandar, podemos optar 
por imprimir con el juego de 
caracteres italicos cursivos. 
Tambien podemos regular 
por medio de soft el espacia- 
do entre renglones, y trabajar 
en modo subrayado y con ca- 
racteres en negrita. 

Las posibilidades de impre- 
sion incluyen un modo grafi- 
co de simple y doble resolu- 
tion. En este modo, pode- 
mos graficar con una resolu- 
tion de 960 puntos por co- 
lumna. 

Finalmente, un modo espe- 



MSX 


cial de cuadruple densidad 
de impresion nos permite tra- 
bajar con 1920 puntos por co- 
lumna. 


BASE DE 
DATOS 

En la localidad de Quilmes 
funciona Digger, una base 
de datos de caracteristicas 
novedosas y completas para 
la comunidad. 

La computadora que se usa 
en Digger es una IBM XT de 
640 Kb. y un disco duro de 30 
Mb. El programa, que fue de- 
sarrollado en su totalidad por 
los tecnicos de la base de da- 
tos, permite acceder a una 
gran gama de opciones a tra- 
ves de sus menues. 

Algunos de los servicios que 
brinda son: mailing, correo e- 
lectronico, colocar avisos 
clasificados, colocar publici- 
dad, juegos, servicios para la 
comunidad (hospitales, hote- 
les, registros civiles, bancos, 
etcetera), catalogo de video. 
Las caracteristicas para co- 
municarse son las siguien- 
tes: 300 baudios, 8 bits de pa- 
labra, 1 bit de stop, sin pari- 
dad y normal Bell. El telefono 
para entrar en Digger es 254- 
9008. 


PRIMER 

GANADOR 



El MSX TEST demostro ha- 
ber tenido una gran recep- 
tion entre los lectores. 
Prueba de ello es la cantidad 
de respuestas recibidas para 
los diferentes Test en curso. 
El MSX TEST n a 1 , que cerro 
el 1 2 de marzo, yatiene su ga- 
nador. Es Rub6n Papazian, 
tiene 35 anos, vive en la ciu- 
dad de Cosquin, Cordoba, y 
es poseedor de una Talent 


MSX. 

Con su ingenio gano un soft a 
election entre el Idea Base, 
Idea Text o Basic Tutor. 


EL LENGUAJE 
DE PROGRAMA- 
CION C 

AUTOR: Brian W. Kernig- 
han- Dennis M.Ritchie 


Este libro se propone ayudar 
al lector a aprender a progra- 
mar en C. 

Este lenguaje felizmente se 
encuentra disponible para 
computadoras hogarenas 
como la MSX y la mayoria de 
las computadoras de la linea 
PC. 

El libro no es un manual intro- 
ductorio a la programacion, 
sino que supone conocimien- 
tos de programacion en al- 
gun lenguaje. 

Esto no significa que el pro- 
gramador principiante en- 
cuentre dificultades al leer y 
comprender sobre la mar- 
cha. 

El primer capitulo es una in- 
troduccion general a la parte 
central de C. 

Los capitulos 2 a 6 desarro- 
llan algunos aspectos del C 
con m«is detalle como: “ope- 
radores, expresiones, es- 
tructura del programa, varia- 
bles externas, apuntadores. 
aritmeticadedirecciones.es- 
tructuras y uniones”. 

El capitulo 7 describe la b - 
blioteca basica de entrada . 
salida de datos en C. 

Por ultimo, el octavo cap!:, c 
describe las relaciones erva 
los programasen Cy e s s'a- 
ma operativo UNIX. D s- 
tribuye: CUSPIDE). 
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lids" trabajos deber&n enviarse antes'del 30 dfe julioprbximo (cierrt del 
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No s61o serb Indispensable que el programa enviado en casete 6 disquete funcione correctamente, sino que adembs 
debe cumplir con ciertas reglas: 

.Programacibn estructurada en bloques fbcilmente diferenciables. 

.Fbcil segulmiento del mismo y detalle de bste como parte de su documentacibn. (Diagrama de bloques con los nu- 
meros de linea que los ldentlflquen). 

.Aclaracibn y clara explicacibn de los algoritmos utlllzados, deben flgurar como parte de la documentacibn. 

.Las variables y/o direcciones de memoria utlllzados tambien se deben incluir en esta documentacibn. 

.Listado de nembnicos assembler y la localizacibn en memoria si es que se utiliza este tipo de lenguaje. 

.Calidad y originalidad de grbficos, sonidos y pantallas de menu. 
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JUEGOS DE ESTRATEGIA 

Ante unajugada nuestra, la computadora responde con otra 
que puede ponernos en un aprieto o directamente vencernos. 
$Pero como hace la maquina para evaluar su tactica a seguir ? 



esde el simple Ta-Te-Tihasta el 
WBm muy complicado ajedrez, los 
juegos de salon son verdaderas 
“batallas”en lasquedoso mas jugadores 
compiten buscando demostrar la supe- 
rioridad de sus estrategias. Por sus ca- 
racterfsticas la computadora es capaz de 
reemplazar a uno de los competidores y, 
de acuerdo con la capacidad del progra- 
mador, tendra, un determinado nivel de 
juego. Es importante destacar que si bien 
en los juegos que tienen estrategias difi- 
ciles de definir, como el ajedrez, el orde- 
nador esta aun por debajo del nivel hu- 
mano, en aquellos otros en donde hay u- 
na estrategia definida y hace falta una 
gran memoria y velocidad de calculo po- 
demos decir que “el programa supera a 
su programador”. 

Se puede hacer una clasificacion de los 
juegos de estrategia de acuerdo con dos 
factores. La informacion que se posee 
puede ser perfecta (si no hay movidas si- 
multaneas y ambos jugadores conocen 
en todo momento mientras dura el juego 
toda movida anterior) o no (cuando no se 
cumple alguna de las condiciones). La o- 
tra distincion posible es la de los juegos 
que tienen movimientos de azar, es de- 
cir, movimientos que no hacen ninguno 
de los jugadores, sino algun mecanismo 
de azar externo, por ejemplo el reparto 
de cartas. 

Con estos factores son posibles las con- 
binaciones que ejemplificamos en la fi- 
gura 1. 

Antes de comenzar un programa de al- 
gun juego de estrategia hay que determi- 
nara que tipo pertenece. Esto nos dar£ u- 
na idea clara de qu6 factores de evalua- 
cion tenemos que ponderar. Analizando 
el juego en profundidad iremos descu- 
briendo las diferentes estrategias del 
mismo. Un consejo util es ir anotando las 

CUADRO 1 


distintas ideas de estrategias aunque 
pensemos que sean malas, ya que des- 
pues se pueden combinar varias estrate- 
gias y la que sola era mala, resulta ser 
muy buena en grupo. ^Como se logra es- 
to? La respuesta a esta pregunta no es u- 
na sola, pero mencionaremos aquf a mo- 
do de ejemplo la existencia de un polino- 
mio de evaluacion, en el que el resultado 
de cada estrategia es multiplicado por un 
coeficiente, a criterio del programador, 
para formar asi el termino de esa estrate- 
gia en particular. Sumando todos los 
terminos lograremos una evaluacion ge- 
neral en que se han tenido en cuenta va- 
rias ideas que, sueltas, no harian nada. 
Tambien se puede hacerlas actuar en 
forma independiente eligiendo luego una 
de las opciones. Esto nos permitira a la 
hora de programar disponer de mas ele- 
mentos. Vamos ahora a desarrollar es- 
trategias generales para distintos tipos 
de juegos y, en notas posteriores, iremos 
dando trucos y rutinas que permitiran la 


aplicacion de las mismas. En los juegos 
con informacion perfecta y con movi- 
mientos del azar (los juegos de cartas en 
los que no hay envites, los de dados) sue- 
len ser muy util usar la memoria de la 
computadora para almacenar los datos 
disponiblesy usar su “fuerzabruta”en los 
calculos de probabilidades para las dife- 
rentes manos. En estos juegos interve- 
ne muy poco la estrategia a adoptar por 
el segundo jugador. En cambio en los 
juegos de movimiento simultaneo se de- 
be tener en cuenta esa estrategia. Por e- 
jemplo en el papel-piedra-tijeras, el juga- 
dor humano, por lo general, se inclinapor 
uno de los tres objetos en desmedro de 
los otros dos. El ordenador puede apro- 
vechar esto haciendo que su opcion mas 
frecuentemente empleada sea la que 
demote a la preferida del rival. 

La dif icultad de los juegos de informacion 
perfecta sin movimientos de azar es des- 
cubrir la estrategia correcta. Si lo logra- 
mos, podremos asegurar que la compu- 
tadora jugar£ bien. En estos juegos deta- 
blerose hace unabusquedade las distin- 
tas piezas jugadas y se efectua una eva- 
luacion relacion&ndolas entre sL El ulti- 
mo factor a considerar para desarrollar 
un programa de juegos 6s el elemento ff- 
sico. Esto no solo tiene que ver con la 
presentation del juego en si. En los jue- 
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gos de cartas, por ejemplo, debemos ob- 
servar como mezclamos el mazo y como 
extraemos las cartas, donde se van a al- 
macenar los datos de los diferentes po- 
zos, cartas en la mano de la computado- 
ra, cartas en la mesa. De esta manera te- 


nemos expuestos someramente los dife- 
rentes tipos de juegos de estrategia que 
existen, lo que nos brinda la base para ir 
desarrollando este tema con profundi- 
dad. 

A continuacion presentamos un pro- 


grama que es una muestra del nivel de 
razonamiento estrategico aplicado a una 
computadora. 


Fernando Pedrb 


CONCURSO 

EL PROGRAMADOR DEL ANO 



Una vez terminado y revisado tu programa, deberas enviarlo a la editorial grabado en un cassette o diskette, 
varias veces para mayor seguridad. (Inclusive grabado con dos grabadores distintos). Indicar en el cassette 
o diskette, los datos del programa, computadora y autor. 

Otra condicion ep que sea original e inedito, es decir que no haya sido enviado a ninguna otra publicacion. 
SI bien es preferible que vaya acompanado del listado del mismo por impresora, 6ste no es imprescindible. 
El programa debera venir con un texto que aclare cual es su nombre, objetivo, modo de uso, y explicacion 
de cada una de sus partes, subrutinas y variables. Si posee lenguaje de maquina, es fundamental una buena 
explicacion sobre su funcionamiento e ingreso a la maquina. No olvidarse los datos completos del autor o 
autores. 

El texto se presentara en hojas tipo oficio y mecanografiado a doble espacio. No importa que la redaccion 
no sea muy Clara, eso queda por nuestra cuenta. 

IMPORTANTES PREMIOS 

Los daremos a conocer proximamente. 

CIERRE: El cierre de recepcion de trabajos para concurso de programas sera el 30/9/88 . (K64 
se reserva el derecho de publicacidn de los programas recibidos, como asimlsmo la devoluclon del material). 






NIM 


Describimos un sen- 
cillo juego, quizas 
conocido por mu- 
chos . En la presente 
version computari- 
zada parece haber 
sido concebido para 
ganarnos incansa - 
blemente . 



MB n efecto, la utilization de confi- 
^HMjguraciones leidasde instruccio- 
|nes DATA establecidas de an- 
temano le permiten a la computadora e- 
fectuar siempre la jugada precisa para 
llegar triunfante al final de las partidas. 
Esta es una muestra del nivel de razona- 
miento estrategico, en este caso muy ele- 
mental, inyectable en nuestra minicom- 
putadora. 

Al comenzar el juego se cargan dichas ju- 
gadas en un vector que se utiliza sucesi- 
vamente a lo largo del programa para tan- 
tear por busqueda secuencial una res- 
puesta ganadora al movimiento humano. 
Las subrutinas utilizadas en el programa 
se han ubicado al comienzo del mismo 
para lograr una mayor rapidez en la bus- 
queda de la respuesta, y como muestra 
de que no necesariamente deben agru- 
parse sobre el fin de los programas. 

El juego en sf consiste en retirar un nume- 
ro de palillos, por cada turno de juego, va- 
riable desde uno hastatodos losde unafi- 
la.EI participante que logre dejar uno so- 
lo sobre la mesa habrct ganado. 



5 KEY OFF 
10 GOTO 210 

20 ' COP I A DE JUGADA EN EL VECTOR W 
50 FOR K= 1 TO 5 
40 W(K)=S(K) 

50 NEXT K 
SO RETURN 

70 ' ORDENAMIENTO DEL VECTOR W 
30 FOR K=1 TO 5 
?0 FOR J=K+1 TO 5 

100 IF W(J)>W(K> THEN C=W < J > : W < J ) =W <K> : (fJ <K> =C 

L 10 NEXT J 

120 NEXT K 
130 RETURN 

140 ' TRANSFORMA MATRIZ EN STR* 

150 C$=" " 

160 FOR K=1 TO 5 

170 IF WOO =0 THEN K=5:G0T0 190 

1B0 C$=C*+STR$<WOO ) 

190 NEXT K 


200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 


RETURN 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


1* 


1 1 


2 1* 


l‘V 

3 2 
" 3 
" 4 


'1111 

l l l"," 


2 1* 
2 1’ 
2 2 


1%' 
3 2 

3 

4 

1 " , " 
5 1 


2 2 
2 2 

3 3 

4 3 

5 4 
1%" 


2 2 11 
i'V 3 3" , 1 
3" , "* 4 4" , ' 
3 " , " 444 
3 2"," 5 4 
5 5 2 2" 


3 3 

4 4 
4 ",“ 
3 2 


5 2 2 
1 1” 
1 1 " 
5 4 


1" 


DIM D$<29) ,S<6> ,W<6) : FALS0=0 
RESTORE 210 

FOR 1=1 TO 29: READ D$<I>:NEXT 
FOR 1=1 TO 5: READ S(I):NEXT I 
PRINT " D I SPOS I C I ON ACTUAL DEL 
FOR 1=1 TO 5: PRINT "FI LA " ; I ; * 
INPUT "DE CUAL FI LA REMUEVES ' 
IF L< 1 OR L>5 THEN 340 
INPUT "CUANTOS PALILLOS 
IF NC< 1 OR NC>S(L) THEN 360 
380 S (L) =S (L) -NC 
390 GOSUB 20 
400 FOR 1=1 TO 5 


I 

TABLERO : " 
CON " ; S ( I ) 

;NC 


PALILLOS": NEXT I 


IF S ( I ) =0 THEN 540 
FOR P=1 TO S(I) 

W ( I ) =W < I ) -P 
GOSUB 70 
GOSUB 140 
ENCUENTRO=FALSO 
FOR K=1 TO 29 

IF C*=D$<K> 

NEXT K 

I F ENCUENTRO THEN NC=P : L= I : P=S ( I ) : GOTO 520 
GOSUB 20 

NEXT P 

THEN 550 


410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 

530 IF ENCUENTRO 

540 NEXT I 

550 IF NOT ENCUENTRO 
PRINT "MI JUGADA 
S <L) =S (L) —NC 
IF 0*0" 1" THEN 


THEN ENCUENTRO=NOT FALSO 


560 

570 

580 

590 


THEN PRINT "NO ENCUENTRO 
CONSISTE EN SACAR ";NC;" 

320 


SOLUC I ON 
PALILLOS 


POS I BLE " : STOP 
DE LA FILA ";L 


PRINT "DADO QUE SOLO REST A UN PALILLO EN LA MESA , HE GANADO!" 




miCROBVTE 


| MONTEVIDEO 252 - BUENOS AIRES - T.E. 38-0331 

SERVICIO PUERTA A PUERTA MSX 



ACCESORIOS 


HARDWARE 


JOYSTICKS 

ARCADE c/autodisparcu— 

200 X (microswitch) _ 

V6.747 (palanca al piso)_ — — 

V6.l2a — ~~ 


— A 115 
, _A 175 

A 120 

,^.A 92 


Cable grabador ^ pp^- A 25 

Diskette 5 1/4 2D.2D x 10_ A 75 


Consultenos por 
cualquier 

equipo o periferico 


0901 -ATHLETIC LAND A 17 

0602-HYPER SPORT 1 A 17 

0003-HYPER SPORT Z A 17 

0806-RO AD FIGHTER A 17 

0609-FLIGHT PATH 737 A 17 

0814- YIE AR KUNG FU- A 17 

0826- KONAMI’S SOCCER A 17 

0827- BOULDER DASH A 17 

0836- STOP THE EXPRESS.... A 17 

0837- RIVER RAID A 17 

0841-H.E.R.O A 17 

0847-TENNIS KONAM1 A 17 

0850-ANTARTC ADVENTURE A 17 

0856-F-16 A 17 

0674- PINGUILANDIA A 17 

0675- CHOPLIFTER A 17 

0676- GALAGA A 17 

0877-KUNG FU MASTER A 17 

0692-GHOSTBUSTERS A 17 

0898-PAC-MAN A 17 

0904-EGGERLAND MISTERY A 17 

0695-EXERION I A 17 

0908-PIPPOLS A 17 

0020- THE DAM BUSTERS A 17 

0922-GRAND PRDC A 17 

0924-PING PONG A 17 

0928- THUNDER BALL A 17 

0929- COMIC BAKERY A 17 

0931 - BOUNDER A 17 

0932- KNIGHT LORE ...A 17 

0933- NIGHTSHADE ...A 17 ( 

0935-TIME PILOT. A 17' 

0937- VALKYR A 17 

0938- ALIEN 8 A 17 

0939- GUN FRIGHT. A 17 

0941 - KINGS VALLEY A 17 

0942- MAGICAL TREE A 17 

0945- FORMATION Z A 17 

0947-MOON PATROL A 17 

0946- ZAXXON II A 17 

0949- ELEVATOR ACTION A 17 

0950- BASEBALL ...A 17 

0951 - YIE AR KUNG FU II A 17 

0953-LAS TRES LUCES DE GLAURUNG A17 

095*TZR A 17 

0955-SCARLET 7 A 17 

0960- ZANAC A 17 

0961- EXOIDEZ. A 17 

0962- RAID ON BUNGELIN BAY A 17 

0963- SWEET ACORN A 17 

0964- XIXOLOG A 17 

0965- CIRCUS CHARLIE A 17 

0966- HYPER RALLY A 17 

0967- BOSCON IAN A 17 

0968- KNK3HTMARE A 17 

0969- Mr. DO - A 17 

0970- PINKY CHASE A 17 

0971- SCION A 17 

0973-SAMURAI NINJA II A 17 


0975- BRUCE LEE A 17 

0976- GYRODINE A 17 

0977- THE WAY OF THE TIGERS A 48 

. 0978-THE GOONIES A 17 

0979- SKYGALDO A 17 

0980- LAZY JONES A 17 

0981- BLACKJACK. A 17 

0983- DUNKSHOT A 17 

0984- B.C.QUEST II... A 17 

0985- COASTER RACE A 17 

0986- THEXDER. A 17 

0987- EXXA INNOVA. A 17 

0989- BANK PANIC A 17 

0990- ZEXXAS II A 17 

0091-GUARDC A 17 

0992-HANG ON A 17 

0994- ALCAZAR A 17 

0995- LODE RUNNER II A 17 

0997- HOLE IN ONE PROFESSIONAL A17 

0998- RABBI AN A 17 

0999- RAM BO A 17 

1000- STAR FORCE A 20 

1001 - MAGICAL KID WIZZARD A 17 

1003- ARKANOID A 20 

1004- GREEN BERET A 20 

1006- MOLE MOLE II A 17 

1007- BATMAN A 20 

1008- HEAD OVER HEELS A 20 

101 0- DAM AS A 17 

1011- SURVIVOR A 20 

1012- GAUNTLET A 20 

1013- DONKEY KONG A 20 

1014- PHANTOMAS II A 20 

1 01 5- INTERNATIONAL KARATE A 20 

1016- KNOCK OUT 3D A 20 

1 01 7- SPACE SHUTTLE A 20 

1018- DEMONIA A 20 

1019- MASTER OF THE LAMPS A 20 

1020- KON AMI'S BOXING A 17 

1021- 007 THE LIVING DAYLIGHTS A 20 

1022- TURBO CHESS A 20 

1025- COS A NOSTRA A 20 

1026- AUF WIEDERSEHEN MONTY A 20 

1027- SPIRITS A 20 

1028- FEUD .A 20 

1029- VESTRON .A 20 

1030- AVENGER A 20 

1031 - WINTER GAMES A 20 

1032- FERNANDO MARTIN BASKET A 20 

1033- WHO DARES WINS II A 20 

1 036- THE LAST M ISS ION A 20 

1 037- LIVINGSTONE SUPONGO..* A 20 

1038- MARTIANOIDS ..A 20 

1039- COLT 36 A 20 

1040- BMX SIMULATOR A 16 

1041- VIDEO POKER A 16 

1042- DESOLATOR A 16 

1043- COLONY A 16 


1044- KRAKOUT 

1045- ARMY MOVES 

1046- HYPERS PORTS 3 

1047- MOP I RANGER 

1048- JET SET WILLY II 

1049- CHORO Q 

1050- PENTAGRAM..... 

1051- NONAMED , 

1052- SUPER BOWL 

1053- CYBERUM 

1054- BEACHHEAD 

1055- CITY CONNECTION 

1056- SPIT FIRE 40 

1057- THE HEIST 

1 058- TRAILBLAZER. 

1059- SEA KING 

1060- SPY vs. SPY II 

1061 - SAMURAI NINJA III 

1063- DUSTIN 

1064- DEATH WISH III 

1065- LEGEND OF KAGEE 

1066- FUZZBALL 

1067- 10th FRAME 

1068- DYNAMITE DAN 

1069- MUTANTMON7Y 

1070- HO WARD THE DUCK 

1071 - COSMIC SHOCK ABSORVER. 

1072- THINGS BOUNCES BACK 

1073- PHANT1S 

1 075- SCENTIPEDE 

1076- ACE OF ACES 

1077- POLICE ACADEMY 

1078- TANK 

1079- GODZILLA. 

1080- SABOTEUR MISSION 

1081 - KILLER TOMATOES 

1082- ANTARES... 

1083- STOP BALL 

1084- COBRA'S ARC 

1085- ROCKY 

1066-ALIENS "EL REGRESO - 


UTILITARIOS 

0829-DESENSAMBLADOR 

08X-ENSAMBLADOR 

0831-CONTABILIDAD GENERAL... 

0632- FICHEROS 

0633- PASCAL 

0834- MINILOGO 

0835- PLAN ILLA DE CALCULO 

0887-CONTROL DE STOCK... 

0911 -CONTROL BANCARIO. 

0936-TASWORD II — 

0993-EDDY II 

1034-KNIGHT COMMANDER... 

1035 KIT DE ALINEACION 


..A 16 
...A 16 
..A 14 
...A 14 
.A 16 
...A 20 
.. A20 
...A 20 
...A 20 
...A 20 
.. A20 
..A 17 
...A 20 
..A 20 
...A 20 
...A 20 
...A 20 
...A 20 
.. A20 
...A 20 
...A 20 
....A 20 
...A 20 
...A 20 
...A 20 
..A 20 
... A 20 
...A 20 
...A 20 
...A 20 
...A 20 
..A 20 
...A 20 
..A 20 
...A 20 
...A 20 
...A 20 
...A 20 
...A 20 
...A 20 
...A 20 


...A 53 
....A 53 
...A 17 
..A 17 
..A 53 
...A 26 
...A 17 
....A 17 
....A 17 
..A 26 
...A 73 
...A 26 
...A 43 




TITULOS: 

NOMBREYAPELLIDO:. 
DIRECCION: 


C.P. 


.LOCALIDAD: 


FORMA DE PAGO: Cheque/giro 


Contrarrembolso PROVINC1A, 


Ghaquas y sir os a la ordan da Edmundo A. Goldin. Gaatosda Envfo A 1 6 




RELO J DIGITAL 

Con este recurso podremos utilizar la computadora con precision mas 
i que aceptable tanto para medir la duracion de sucesos externos al sis- 
i tema ( ejemplo : la ejecucion de una pieza musical ) 9 como para cronome- 
i trar determinados algoritmos que se encargan de tareas comunmente 
! lerdas f tales como el ordenamiento de vectores y busquedas. 



na de las tantas ventajas que 
nos brinda la norma MSX es la 
de poseer un "reloj interno” que 
funciona automaticamente, sin 
! intervencion alguna del usuario. 

MIDIENDO EL TIEMPO 

Realmente el citado “reloj interno” es tan 
solo una variable fija del sistema llamado 
TIME, detipo contador, que se incremen- 
ta 50 veces por segundo, una con cada 
ciclo de la corriente electrica. Esta varia- 
ble es facilmente accesible desde el BA- 
SIC ;se puede realizar (poniendo su valor 
a CERO) en cualquier punto de un pro- 
grama (TIME=0) o actuar sobre ella co- 
mo con cualquier otra. 

LIMITACIONES 

Dado que la variable TIME solo puede al- 
macenar valores enteros positivos (nu- 
meros naturales) hasta el 65535 (64 * 
1024), tal como lo presentamos en los 
dos listados: DIGItron y INTERkron, solo 
pueden medirse lapsos de hasta algo 
mas de veinte minutos (exactamente 21 
min. 50 seg. 70/1 00), suf iciente en la ma- 
yorfade los casos. Si se requiriera mayor 
duracion, deberian efectuarse algunas 
modificaciones, tales como agregar una 
variable extra. 

Otra limitacibn es la de la exactitud intrin- 
seca del programa. Si se desea aumen- 
tar la misma, pueden modificarse algu- 
nas lineas del programa, agregando al- 
gunos REM o simplificando algunas sen- 
tences para retardar o acelerar el proce- 
so y ajustarlo al ritmo de un cron6metro 
patron. 

ALGORITMOS DE 
CALCULO 

Dado que sabemos que TIME se incre- 
menta en forma autombtica cincuenta 
veces por segundo, dividiendo el valor de 
la variable por 50, tendremos el tiempo 
transcurrido medido en segundos (ver fi- 
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gura 1). 

Para descomponer esa cantidad en mi- 
nutos y segundos, solo resta simplemen- 
te dividirla por 60. La parte entera del CO- 
CIENTE de esa operation indica los mi- 
nutos, y el RESTO de la misma corres- 
ponds a los segundos restantes (verfigu- 
ra 2). 

Para calcular el RESTO de una division, 
se puede recurrir a utilizar una formula al- 
go compleja: R = INT (T - 60 * INT (T / 
60)), o a lafuncion residente en el BASIC 
MSX que nos calcula este dato en forma 
directa, que es MOD. Obviamente utiliza- 
remos la forma predefinida por su senci- 

FIGURA1 


LET T = T X ME 

/ SO 

FIGURA2 

TIME/SO : 

© O 

SEG 

MI N 

FIGURA3 

LET MIN = INT < T / 

GO > 


LET SEG = T MOD GO 

LET DO = <T — X N’T <T>> =* XOO 


10 

REM 


12 

REM 

* 

* 

14 

REM 

* 

DIGItron* 

16 

REM 

* 

* 

18 

REM 

* 

Reloj digital * 

20 

REM 

* 

* 

22 

24 

REM 

REM 


26 

28 

REM 

REM 

por 

Gustavo Delfino 


30 OPEN "GRP:" AS *1 
32 COLOR 1,10,10 : SCREEN 3 
34 PSET (5,80) ' 

36 PRINT *1, "DIGItron" 

38 SOUND 1,0 : SOUND 8,0 
40 SOUND 7,254 : SOUND 8,16 
42 SOUND 13,1 : SOUND 0,60 
44 SOUND 1,0 : SOUND 11,230 
46 SOUND 12,35 

48 IF INKEYS = ”” THEN GOTO 48 
50 SOUND 13,1 : SOUND 0,90 
52 SCREEN 0 : KEY OFF .-COLOR 4,15 
54 PRINT ’‘Pulse cualquier tecla 
para comenzar" 

56 LOCATE 9,3: PRINT 1” 

58 LOCATE 9, 4: PRINT ” 

60 LOCATE 9, 5: PRINT ” ” 

62 LOCATE 9, 6: PRINT ” 

64 LOCATE 9, 7: PRINT ”■ ” 

66 LOCATE 10, 4: PRINT "imrssidc" 
68 LOCATE 10, 6: PRINT ” 0: 0: 0” 

70 IF INKBY* = "" THEN GOTO 70 
72 LOCATE, 10 : PRINT ’’Pulse cual 
quier tecla para finalizar” 

74 TIME = 0 

76 REM 

78 mT T = TIME / 50 
80 LOCATE 10,6 : PRINT USING 

; INT <T/60> ; T MOD 
60 ; ( T - INT (T) ) * 100 

82 IF INKEYS = THEN GOTO 78 

84 REM - - 

86 LOCATE 0,12 
88 SOUND 13,1: SOUND 0,90 
90 CLOSE # 1 : KEY ON 
92 END 




Ilez inherente. 

Finalmente, para calcular las fracciones 
de segundo (centesimas), bastacon res- 
tar de T su parte entera y al resultado 
multiplicarlo por 100 (ver figura 3). 

DIGITRON: UN 
CRONOMETRO DE MESA 

Este primer programa nos permite medir 
el tiempo transcurrido entre el instante en 
que pulsamos cualquier tecla por prime- 
ra vez, para poner en funcionamiento el 
cronometro (literalmente hablando) y la 
segunda, para detenerlo. 

Resulta mas que obvio precisar que la u- 
tilidad de este pequeno programa solo 
esta limitada a la exploracion de las posi- 
bilidades que nos brinda el BASIC de la 
norma MSX, masquealusoensiquepo- 
damos llegar a darle. Cualquier reloj de 
pulsera cumple con esta misma finalidad 
con ventajas, salvo en cuanto a lapsos 
muy breves de unos pocos segundos, en 
los cuales esta propuesta puede ser mas 
adecuada. 

Observese en el listado del programa, el 
uso que hemos hecho de: a) el modo de 
pantalla3 (SCREEN 3) = GRAFICOS EN 
BAJA RESOLUCION para el ti'tulo; b) el 
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10 REM ********************* 

14 REM * * 

18 REM *INTERkron* 

22 REM * * 

26 REM ********************* 

30 REM 

34 REM por Gustavo Delfino 
38 REM 

42 REM -- --------- 

46 REM Ubique la lfnea siguiente 
al COMIENZO del acontecimien- 
to que desea cronometrar . 

50 TIME = 0 : LET T1 = TIME / 50 

54 REM 

58 REM Ubique la 1/nea siguiente 
al FINALIZAR el suceso. 

62 LET T2 = TIME / 50 

66 REM - ---------- 

70 LET T = T2 - T1 

74 LET MIN = INT ( T / 60 > 

78 LET SEG = T MOD 60 

92 LET DC = <T - INT <T) ) * 100 

86 PRINT ” Lapso transcurrido” 

90 PRINT MIN; ”m” ; SEG; ”s” ; DC; ”dc” 
94 END 


uso de los sonidos; c) e! empleo de carac- 
teres graficos predefinidos para enmar- 
car el reloj y d) el manejo de pantalla con 
LOCATE y PRINT USING. 
Notesetambien que en el modulo opera- 
tive en si. encerrado entre Kneas con 
RAM, no se ha recurrido al almacena- 
miento previo de los valores resultantes 


del cblculo, sino que estos resultados 
son directamente exhibidos por medio 
del PRINT. Esto ha sido efectuado de es- 
ta manera, al solo efecto de ahorrar algu- 
nas fracciones de segundo en cada ciclc 
(ver figura 4). 

INTERKRON: TOMANDO 
EL TIEMPO 

Este segundo programa nos permite me 
direltiempoque demora en ejecutarse u 
na rutina de algun programa, que por si 
repetitividad pueda llegar a convertirse 
en el eslabbn mas lento del conjunto, ta 
como pueden ser las rutinas de ordena 
miento de datos estructurados homo 
geneos (VECTORES). 

Con este recurso de medicion, podemos 
finalmente constatar cuantos segundos 
o fracciones de segundo ahorramos; 
cuando eliminamos REMarks, LETs, in- 
dentado de ciclos u otros recursos que 
hacen a la programacion mas ordenade 
y de mas facil lectura e interpretacion. 
Sugiero someter a medicibn de tiempc 
lasdos formas de un mismo programa, u- 
na con los REM que requiera, los LET, et- 
cetera, y la otra quitandole los mismos 
(ver figura 5). 

Gustavo O. Delfino 


i 


I 




MIL 

Con el auspicio de 

HISTORIAS DE DA 

ARGENTINA 
SECRETA. 




K$4 


a 


Lanza este concurso que permitira que dos escuelas argentinas posean un equipo completo de 
computacidn Talent MSX y suscripciones de la revista K-64. 

Ademds, las primeras 100 escuelas que escriban recibirdn una colecci6n completa de muestra re- 
vista. 

Los alumnos tienen que hacer llegar una carta -por correo o personalmente- a nombre de ’’Histo- 
rias de la Argentina Secreta", ATC, Avda. Pte. Figueroa Alcorta 2977, (1425) 
Buenos Aires. En la misma deberan indicar nombre y apellido, nombre de la escuela a la que 
concurren, grado y direccidn del establecimiento. 

Es una oportunidad para hacerle un regalo a la escuela. 




Sueldos MSX 



de legajo: 7 

Hottbrel Ju.^r* Lor>ez 



Clase: Comercial 
Autor: Sergio Segura 

n esta version reducida de 
Sueldos, ofrecemos no solo la 
emision de dicho recibo, sino 
i tambien la combinacion de varias subru- 
, tinas interesantes... 

' Este programa realiza el calculo, impre- 
I sion y posteriorgrabacion de una liquida- 
ci6n de haberes, en base a conceptos ta- 
! les como: 

f 

Haberes con aporte: 

1) Sueldo Bruto 

2) Premios 

3) Horas Extras 

4) Sueldo Anual complementary 

Haberes sin aportes: 

5) Esposa 

6) Hijos 

7) Escolaridad 

Retenciones: 

8) Descuentos Varios 

9) Jubilacion 1 1 % 

1 0) Obra Social 3% 

11) Ley 19.032 1% 

Desde luego que se han elegido los con- 
ceptos basicos para una liquidacibn nor- 
mal y tambien para el caso de aguinaldo. 
Esto no quita que el ingenio del lector ha- 
ga susceptibles mejoras al mismo, am- 
pliando la cantidad de conceptos, su 
calculo y salida a impresora si lo desea. 
El mismo cuenta con algunas subrutinas 
que, gracias a su estructura modular, 
son de uso general para cualquier siste- 
ma. Ejemplo de ello es la rutina de con- 
trol de ingreso de datos, Manejo de Cam- 
pos enpantallay Boxes. Estas funcionan 
con el envio de parbmetros (Datos de 
Entrada y Salida). 

Estructura del programa: 

10-110: Aperturade archivos e incializa- 
ciones varias 
120-400: Area de Datas 
1000-1400: Control del Programa 
2000-2900: Ingreso de Datos 
3000-3400: Calculo de Iiquidaci6n 
4000-4500: Impresi6n del recibo de 
Sueldos 

5000-5100: Impresibn de Datas en Pan- 
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talla 

6000-6170: Lectura del Archivo 
6200-6260: Grabacion del Archivo 
6300-6400: Impresion de los Campos 
1 0000-1 0480 : Dibuja un “marco” en el vi- 
sor 

30000-32180: Manejo de Campos en 
Pantalla 

50000-50800: Errores 

Variables Importantes: 

Ll$=Numero de Legajo 
Nl$=Nombre del empleado 
CA$()=Cantidades e importes a ingresar 
RE()=hnportes surgidos del calculo 
HCA^sTotal de Haberes sujetos a des- 
cuentos 

HSA^sTotal de Haberes sin retencion 
DTS^sRetenciones a Realizar 
CN$()=Estructura de archivo 
ZZ$=Variable a ser modif icada por la su- 
brutina 30000 

TI$=Tipo de Variable (A/N/F) 
A$=Consistencia del dato 
L=Longitud del campo 
ND%=Numero de decimales 
X=Coordenada del cursor en Columna 
YsCoordenada del cursor en Fila 
CL%=Longitud del "marco” en columnas 
FLI%=Cantidad de filas que ocuparb el 
“marco” 


Cabe aclarar que para la liquidacion de 
aguinaldo se deberb colocar donde dice 
"S.A.C.”, el mejor sueldo percibido en el 
semestre; en el caso que este sea cero 
(0) se omitira el calculo del mismo, al i- 
gual que para el concepto Esposa, la ci- 
fra a colocar sera 1 ,00 y en hijos la can- 
tidad. Cuando los valores correspon- 
dientes a Subsidios deban ser modifica- 
dos. se procedera a realizar su cambio 
en las llneas 3220-3260. 

En el resto de los conceptos se ingresa- 
ra directamente el importe a liquidar; to- 
dos ellos seran de signo positivo pues el 
sistema se encarga de realizar las su- 
mas y restas correspondientes. Ej.: Des- 
cuentos Varios, se asume automatica- 
mente como negativo.Lo mismo para Ju- 
bilacibn, Obra Social y Ley 19.032. 
Finalmente, sugiero la ampliacibn de es- 
te “Sueldos en Escala Reducida”, a tra- 
vbs de la confeccibn de programas adi- 
cionales tales como: Mantenimiento de 
Personal, Diversos listadores Oficiales 
(Planillade Jubilacibn, Obra social, Sin- 
dicato, Libro Ley, etcetera), Estadlsticos 
(Planilla de Cambio, Totales por Centro 
de Costo, Totales por concepto, Asiento 
Resumen...) y ,por supuesto, la emision 
de recibo por impresora. 

Una labor para pensar.... 




(M 

IM 


Ui 

ax 


i 

* 

* * « 

d d 0 

U 01 H < 
I X Q f 


d 
•I d 

> f- 
X 
ili 


n n 


iff 

N 

n 


0 ii 
3 

to « 
o a. 
0 a 


iff iff 
a. a. 


Ui 

ax 


d 

0 

1 


iff 

d 

u 

J 

-I 

> 


U CM 

a w 


- i. o 

xi .o x -t 

3 O ill ^ 


II 






1 1 



ii 

ax 



Ui 


0 

- 

_l 

u 







1 1 


It 



in 

o 

a: 


r 


* 

OX 

iff 






l I 

d 

■I 


z 

-4 

CM 







H 



O 

o 

o 

i i 

d 

u 

d 

Ui 



■*■ 





+ 

J- 



o 

o 

o 

1 1 

■— 

X 

-* 

X 

* 

* 




0 






V 

•H 

o 

i i 

*tf 


uJ 

h- 



-s 

—> 

—1 

o 

»4 

•*» 

.. 



CM 

04 


l l 

d 

f 

LX 




M3 

CO 


• 

O 

IN 







1 i 

o 



o 




•-* 

• 


• 

*•" 




z 

z 

z 

1 i 

' — 


2 

/s 

Ml 

f\ 

Ui 

Iff 


i 


L'J 

z 



U 

u 

Ui 

1 l 

_l 

4: 

LjJ 

V 


•*' 

X 

d 

1 


1 

CL 

'0 




X 

X 

1 O 1 

m «i 


x 


iff 

iff 


u 


* 






H 

f- 

I— 

1 0 1 

o 


1- 


d 

d 

+ 


* 


* 

+ 

:l 






i 3 l 

o 

UJ 



u 

o 


_i 


* 







_ 

. 

1 U I 

f- II 

a: 

o 

in 




<z 

* 

d 

* 

— 

iff 

O 



z 

a 

i -1 l 




— 

-1 

_l 

u) 

3> 

d 

u 

<r 

OD 


o 


- 



l d i 

H 

ii 

/s 

iff 

d 

d 



u 

I 

o 



O 

iff 




l O 1 

d 


✓ 

d 

o 

o 

Ui 

1 

I 


X 

UJ 

. . 

o 

N 

II 

II 

II 

1 1 

O II d 

* 


o 



CL 



M 


OX 


u o 

I [L 


~ d d * 
Ill O d d 

ax x a 

. H I 

X 

Ui a 
Z M 


-J 

d ~ 
X> 0 

Ll Ui 
m a: 


r\ * 

~ d 
Ui lO 

a x 







iff 



in 

, 


o 

u 

.. 








J 



•j; 

V 













<z 


f4 

> 










J 


<z 

ai 

in 

U 

<1 

II 




IN 







n 

a 

in 






—4 




o 


Ui 

<i 

3 

m 


-1 




II 






a: 

l 

0) 

p 

o 
















• • 



1 

*« 




* 


s 

« 

. 

• 

UJ 




1 

J 




* 


* 

4J 

a 


z 

« 



It 1 

u. 


it 

.t 

* 


* 

□ 

0 

0 

: 




1 


X 

i. 

•0 

: 


• 


i- 

H 

0 

s 



H 1 

.. 

0 

—i 

CM 



«k 

: 

s 

r 

z 




It 1 


a 



o 


* 

o 

0 

o 

M 

II 



*J 1 

in 


Ql 

0) 

z 


* 

z 

r 

z 

to 




C 1 

ro 

it 

£ 

£ 

M 

iff 

* 

M 

1-4 

t-H 

:d 

iff 



It 1 




■*4 

CO 

H 

* 

(0 

CO 

u) 


M 

O 

3 

fL 1 

ii 

3 

i. 


73 

z 

* 

D 

D 

3 


1- 

O 

O 

1 


n 

a 

a 



* 




H 


T 

o 

i. 1 

s« 


c 

g 

H 

H 

* 

f- 

H 

h- 

2 

• * 

d 

—4 

0 1 

J 

Q 

•H 

*— i 

Z 

Z 

* 

Z 

Z 

7 

M 




a i 

u 


. 

m 

M 

►H 

* 

M 

►H 

-4 

jX 

r 

Z 

z 

i 





[L 

a: 

s 

ax 

OX 

X 

u. 

7 

«.d 

ui 

0 1 

,, 




CL 

CL 

-H > *0 

Cl 

UL 



w 

X 

•jr 

n \ 












r 

h- 

►- 

■r* 1 

— 1 




• • 

•• 

CD H H 





il 




oooooooooooo 
in 'O ll' 3M’tlf)'0N0«QH 

wr-widvrxrddddO'O' 
N I I N N 01 04 f M N IN 01 N CM 


10 

CN 


H 

* 




i 

a 

i 





•— 


Ml 


z 


i 

£ 

i 



Ui 

Ld 

Ui 

Ld 

f- 


OX 


i 

M 

i 



u: 

CL 

LtX 

X 

Q 


3 


i 


i 









V- 


i 


i 


CO 







LU 






-i 






• 

OX 






o 

o 

O 

o 

o 

O 

o 

o 

O 

o 

o 

o 

o 

o 

-4 

CM 

d 

•o 

CO 

fh 

O 

-H 

o 

—i 

fM 

n 

d 

n 

n 

n 

n 

n 

n 

t 

d 

o 

o 

O 

o 

O 

n 

n 

n 

n 

M 

n 

n 

rt 

d 

d 

d 

d 

d 


11 

o 

O 


o 


n 

d 


I- 


D 

+ 


0 

t> 

o 

-4 


tff 

o 



z 


O 

CM 

o 

o 

o 





UJ 




•H 

-» 

CM 

M 


•t 

o 



i 

>- 

o 


o 

n 

o 

CM 

CM 


-< 

H 

H* 

> 



M 

m. 

m, 



o 

iff 




o 


o 


o 

fM 



II 

<t 

Z 



n 

n 

M 

•“) 


• < 

o 

N 

■1 

II 

• a 

•H 

Ui 

in 

Ui 

in 





U 

M 

ii 

c 







n 

N 





ax 


ax 


UJ 

UJ 


<t 

O 

ax 


«t 

UJ 

UJ 

UJ 

UJ 

* 

Hf 



«f 

iff 

H 

CQ 

o 

CQ 

o 

CQ 

1- 

H 

M] 


-1 

Q. 

>- 


i- 

H 

K 

H- 

■n 

u. 

w 

il 

u. 

Cl 


3 

H 

3 

H 

3 

<1 

<r 






H 

<i 

d 

<C 

<t 

»- 

o 

o 


o 

O 

II 

CO 

co 

to 

to 

0 

U 

CJ 

II 

ax 




X 

u 

U 

U 

o 

CQ 


to 

iff 




O 

UJ 

o 

UJ 

O 

o 

o 


o 




UJ 

o 

o 

o 

o 


II 

o 

a. 

u. 

Ll 

X 

0 

ax 

0 

ax 

0 

-I 

-i 

>- 

L. 




z 

_J 

_J 

-1 

-J 

* 


0 

o 

•-I 



d ijf 
CO Kj 

X N 


00000000000 0 0000 0 000000000000000000000000000000* 0 0 0 0 0000 
OHNIOOHNMT'fl(hN'JilNtl'HN1‘ , 0 0)()'0 < HO-iNritOH(Ntt , flll'flN' , NI'')fll)'00'H(Nf , )^0“'W^I!)'0 0 0 
oooo-4-H-<-«^’-«-«CMNCMCMfM0:)0 0n0ddOoooo*4-<-4-<-i-'-<-«CMCMrMCMCMrM0000oddddddino 


D d 
<1 


II 

II 

II 

II 

il 

II 

>d ii 
•- ti 
3 ii 
cn ii 
aj ii 
CO II 
II 


<3- ~ 
IX 

- # 

0 o 

iff i.O 

z <t 
u 

d 

(0 - 
d - 
CO 

d iff 


- 0) 
N <r 

iff d 

z 

u * 
t\ 

in - 

<C £ 

u 

d 

1.1 

O - d 
CO ~ 


z 

Ui 

- 0 
o 

(M -• 


Z ~ 
U *0 


to iff 
d z 


in z s« 

0 N H rt H 

•*■« 10 »— i 


_l X 
U. 0 
.. CQ 

in it 
n 

3 

ii a 


a» □ it 

g in - □ 

•w (D 3 jq it 

i. <l u ~ A 

a (Ph u it 
it a* 


ll 

a 


0 

ll 




0 


d 





Ql 


i 

L 


a 




E 

L 



. 

CM 


i 

0 

1 




s« 

Q 


M 

►4 

U 

a 

0 



l 0 

1 





X 


0 

M 







r 



II 

T3 


•^4 

’ll 




CL 

0 


0 




X> 


1 

0 


X 





It 


• 

u 

0 


c 

L 

1 




J 

» 









i a 

i 


«• 



f- 

O' 


|S 


.a 





II 



II 



IT» 

ll 





< 


<z 





• • 

i 


in 

0 




L 


it 

U 

Q 

O 


i 

a 

1 




u 










i <t 

l 






O' 












II 

Ol 


L 

M 



O 



iff 


H 



a 

a* 

1 

0 

0 



It 


a 


£ 

!t 

0 

O' 


I 


1 














I P 

1 


: 



o 

O' 




t 





iff 



II 

3 


Ql 

II 



O 

o 

= 

D 

d 




i. 

L 

l 

«?> 

■rt 

in 

u 

in 

in 


• 




-4 


i 

rt 

1 




at 










i 

1 


Si 








: 





d 



II 

to 


0 

II 



O 

fM 

H 

Z 





Oj 

a 

1 

iH 

£ 

it 

• 

0 

□ 


U 

M- 

■r4 

it 



i 

Hi 

1 














1 Ql 

1 


II 



ll 

II 




il 







iff 

II 




II 



o 

—• 

<r 



iff 



£ 

£ 

1 

Oi 

ill 

L 

<1 

a 

•n 

u 

in 

C 

a 

L 

X 


I 

TJ 

1 




*4 










1 V 

1 















• a 


N 

II 

'll 


L 

II 



UJ 

» 

Q 

0 


z 



3 

0 

1 

3 

L 

□ 

• 

in 

•H 

in 

m 

□ 

3 

a 

Ql 


i 


1 





o 

o 








1 

1 


iff 

O 







4f 

o 





O 

: 4 

II 

O 


0 

II 




Z 

• 

<x 

in 

u 



Z 

Z 

l 

0 

CL 

X 

0) 

u 

X 

0 

p 

o 

n 

o 

a 


I 

— 1 

1 




II 

o 

CM 

O 

o 

O 

o 

O 



1 0 

1 


d 

O 


iff 

iff 

O 

o 


d 

o 



0 

.■« 

o 


II 



a 

II 



o 

u 

O 






s 

z 

s 


: 

X 

s 

£ 

z 

= 

E 

= 

s 

£ 

s 


I 

□ 

1 





o 


o 

o 

O 

o 

o 



• oi 

I 



O 

4tf 

-4 

-4 

O 

o 



0 iff 




d 

o 

il 

II 

c 



II 



f~ 

■» 

Q 

o 

iff 

0 



















I 

L 

1 


2 


>- 

o 


o 

o 

O 

o 

CM 



i -ii 

1 


«■ 

o 

N 

•J 

0 


0 


.1 

O N 



O 

d 

o 


II 

0 


0 

II 



o 


M 

CM 

z 

<t 



n 







o 


(M 

ro 

04 

d 

in 

'O 


I 

a 

1 

„ 2 



-4 

0 

in 

CM 

0 

d 

M) 




1 



0 

fM 



'0 

Mi 



0 fM 



i- 


0 


II 

•*4 


X) 

II 


O 

0 

o 

3 


u 




w 

d 

in 

'0 

tN 

CD 

Ch 

—1 

♦H 

H 


CM 





I 

c 

1 




.. 


a 






O 


. rn 

l 


iff 



0 

0 




Kf 





iff 


d 

II 

u 

X 

<t 

II 


O 


CM 

Gf 



d 



M 
















I 

□ 

1 


II 



0 

o 

0 

0 

0 

0 

0 

o 


1 c 

1 


—4 

(Q 

II 

d 

d 

0 

0 



0 II 



• 4 

d 

0 

d 

II 

rt 

jn 

£ 

II 


O 

ax 

w 

M 

•H 

to 




« 

n 

n 

to 

n 

n 

n 

n 

n 

n 

n 

to 

n 

0 

0 


I 

u 

1 




—4 

3 

i— 

3 

3 

D 

3 

3 

o 


1 *H 

1 


0 

3 


> 

> 

13 

M 


2 

a 



:\ 

U 

3 

— 

II 

■o 

z 

it 

II 


111 

o 

iff 

-J 

* 

<1 

•» 


LL 

N 
















i 


1 


iff 

0 


0 

0 

0 

0 

0 

0 

0 

•H 


1 

1 



0 

♦if 



•) 

• 



0 Iff 



d 


VI 

iff 

II 




II 



ox 

<z 






U. 

















I 


1 


-4 

J 

|| 

O 

0 

O 

O 

O 

□ 

O 



1 

1 


|| 

O 


ll 

a 

O 

O 


i: 

O - 4 



d 

>1 

0 

d 

II 

3 

it 

0 

II 


ax 

DX 

a 


P 

d 

o 


o 

















! 


1 


J 

u 

X 

0 

a 

0 

0 

0 

0 

0 

0 


1 

i 



0 

-J 

► 4 

f-4 

0 

o 



0 Z 





o 

u 

It 

CT 

£. 

0 

II 


<z 

0 


z 

_J 


—4 



<1 


<L 

<1 

<t 

<z 


<t 


<t 

<L d < 

d 

d 


1 


1 












H 


1 

1 


iff 








Tf 



MJ 

a 

* 



II 

•»* 

It 

L 

II 


UJ 


7£ 

0 

0 



0 

>- 

H 

H 


H 

i- 

H 

f- 

4- 


H 

»- 

H 

i- 

H 

4- 


1 


1 












o 


1 

i 


N 








M 




o 

!M 



II 

-J 

a 

CL 

II 


-J 

z 

H 

f. 

H 

— 

iff 

-1 

IU 

<r 

<1 

<z 

<X 

cc 



<1 

<X 

C 


d 

d 

d 

d 


r 

- 

- 

- 











0 













>0 


. 

>• 

a 

f 1 



II 




II 


u 

o 

Q 

o 

Ll 

d 

z 

u 

z 

Q 

P 

p 

P 

p 

P 

p 

P 

Q 

P 

p 

Q 

p 

P 

Q 




































» 

* 

• 

•* 

» 

* 






w 

o 



















o 

o 

o 

O 

o 

o 

o 

o 

o 

o 

O 

O 

O 

O 

o 

o 

o o 

o 

O 

O 

o 

o 

o 

0 

O 

« 

o 

o 

o o 

O 

o 

o 

o 

o 

o 












iff 


o 

O 

o 

O 

0 

O 

o 

O 

o 

O 

O 

O 

o 

O 

o 

O 

O 

O 

o 

-4 

CM 

0 

0 

M3 

o 

-4 

CM 

d 

o 

CM 

d 

l\ 

o 

o 

o 

04 

0 

•4- 

in 

*0 

Os 

|\ 

0 

o 

IX o 

04 d 

O' 

H 

04 

O 

IM 

d 

o 

O 

o 

O 

O 

o 

D1 

o 

if) 

o 

O 

z 

to 

o 

•4 

04 

M 

n 

d 

in 

MJ 

r\ 

0 

O' 

o 

-4 

CM 

o 


fM 

o 

o 

o 

O 

O 

o 

O 


—4 

-4 


CM 

fM 

04 

CM 

0 

d 

o o 

o 

O 

o 

o 

o 

o 

o 

O 

o 



*H H 


CM 

CM 

0 M f<X 


CM 

n 

d 

m 

Ml 

'0 

l\ 


(0 

O' 

u 

<x 





H 


-4 


••4 

H 


CM 

OM 

CM 

n 

0 

0 

d 

-4 

-1 

—t 

-4 

-I 


-4 

-1 

-1 

•H 




-4 

-4 

•H 

04 04 

CM 

04 

CM 

CM 

04 

CM 

CM 

CM 

C4 

r 4 

rj 

04 04 

CM 

CM 

CM 

CM 

(M 

N 




d 




ll 


0 


>• 

0 

II 



•4 

> 


•• 




-4 

II 



-4 


*4 



X 

CM 


II 


|| 



• * 



X 


X 



CM 

.. 



II 



o 


o 



.M 



II 

P 

II 



z 



.M 


ji 


a 


p 


z 

O' 

7 





o 

.. 

II 

• a 

d 

o 


0 

o 

CM 

0 


CM 



II 


II 

• • 


O 



0 

1- P 

0 

= 


o z 

0 Li 


Z 

o 


to 

a. _j 

111 (1 <t H 

u ox to 

W Z O Ui 
Li I- OX 
ZIUL 


Pag. 13 



A 


: 

S 


UJ 


UJ 








0 


V 


• + 

+ 


0 


H 

Ift 







z 




— 



0 


4 

m 







w 


—a 


<x 

H 


UJ 


U 








0 


ft 


1 

+ 

<z 



O 

ft 







D 


m 


_l 

4 

1 



J 

4 









m 


n 

1 

_l 

z 


• • 










ft 


H 

0 

at 

0 



-b 









4 


•f 

at 

<1 

D 


Q 

■«— 







1- 


at 


4 

4 

at 

H 


Z 

0 







Z 


-4 


m 

at 

ft 

UJ 


< 

1- 







M 


*— 


ft 

ft 

N 

0 


O 

0) 







a: 


X 


N 

N 

N 

>« 


-4 

z 







CL 


t- 


N 

N 

■— ■ 

ft 


”Sa 

M 



M 




mm 


C0 


— 

— 

ft 

N 


-a 

— 





>• 


o 


z 


ft 

ft 

Q 

N 


ft 



•• 

H 




m 


tH 


O 

P 

M 



N 




I 


— b 


V 


— 


►4 

M 

z 



N 

0 


-4 

<z 


1 

-1 

■b 

H 



z 

z 

+ 

H 

ft 


o 

•• 

1 

II 


4 

+ 

X 


O' 


+ 

+ 

= 

Z 

N 

-J 


*-< 

<1 

<r 

o 

II 

<C 

z 

ft 

o 


A 

-N 


M 

N 

4 


+ 

II 

•• 

in 

<1 

II 

a: 




a-b 

CM 

S 

a 


3 

-a 

<r 

4 


o 

• • 

<t 

o 

3 

A 

-4 

1 

1 

+ 

CL 

— + 

Mb 


ii 

aa 

: 

H 


•• 

UJ H 

X 

r\ 

+ 

c 

<1 

-a 

a* 


ft 

IS 

<t 



to 

s 


1- UJ 

z 

CM 

4 


- 

H 

o 

Q - O 

o 

in 

•• 

= 

* 



= 

<1 X 


0 

0 

Ui 

0 

X 

UJ 


* 

* 


* 

* 


U 4 -V 
•• 

n v » n 
.• m n 


z - in 

< ft o ~ 
O N -h = 
h N M t 
Me - 


ft II O = O 

V « = - — h— II = 

ii n ii -i o - ii 

- - - 0 ^ - 


CM O 
II O 
- O 
CM O 


O * 
rs m 

-b C 

>o ^ 


•H 

#-S 

II 



» 


aa 








«-b 

Z 

o 

ab 




9k 


i 

aa 

H 

ab 








n 






o 


a- 

n 




0 


■b 

# 


* 


N 







UJ 



» 

0 

H 

s< 



a 

<z 

•H 



1 

4 

<c 



z 

ab 


ll 


ab 






o 


0 





z 

£ 

> 

n 

H 

p 

p 

N 







1- 



N 

J 

O 

p 

0 


— 

9k 

1 

ab 

-b 

ab 



0 

0 




o 






o 


P 

o 




o 

a 

■b 


ab 

M 

M 

■>— 


CM 





4 



N 


0 

Z 

z 


o « 

<1 

» 

3 

ab 

» 



i 

ab 


>5 


n 






0 



j- 




0 


H 

u 

<1 

z 

z 



m 





U 




1 


— * 

M 


0 

N 


N 


» 

N 



h- 

# 


M 


ab 








z 

o 




0 

* 

1 

0 

ab 

II 

II 

P 


ab 




o 

O 



-J 

J 

aa 


0 


<t N Ifr 

N 

3 

N 

N 




N 


0 




H 




O 


0 

0 




X 

* 


4 

» 

# 

» 

M 


-1 

+ 



o 

_l 



<t 

' — 


0 

D 



b^ 

N 

b- 

ab 

N 

— • 




N 


<1 


n 


X 




H 


X 







+ 


N 

N 

N 

z 


— 

4 



o 




> 


b-b 

z 



P 

# 

N 

IR 

0 

b^ 

# 




ba- 


0 


ab 


0 




O 


K 

• a 



1 1 

z 

L 

X 

Q 

N 

N 

N 

II 


& 

|| 

1 


N 



* 

>— 

0 

3 

M 



Z 

P 


P 

b^ 

HI 

P 



o 

ft 

* 



o 


z 


o 


0 






1 1 

0 

0 


Z 

— 



» 


0 

4 

<t 


n 

z 


* 

ill 

u 

# 

0 



4 

M 

» 

M 

* 

P 

t— i 



11 

P 

* 

0 


0 


aa 


o 



A 

a 

X 



1 1 

I 

L 

UJ 

«I 

# 

Z 


N 


z 


II 



UJ 


* 

CL 

<r 

3 

1- 




z 

P 

z 

O 

M 

Z 



0 

M 

* 

0 


ab 



Mb 

o 

Mb 


ft 

CM 

0 



1 1 

H 

L 

H 


P 

UJ 

Z 

N 


M 

Z 

4 


z 

X 


* 

H 

CL 

ab 

0 



0 

aa 

M 


z 

z 





z 

* 

0 




Mb 

ft 

o 

ft 

X 

M 


0 



1 1 


0 

<t 

H 

M 

I 

UJ 



CL 

hi 



UJ 

f- 


* 

0 

0 

0 

+ 



«T 

o 

z 

z 

M 


Z 





* 

0 


ro 


<1 

z 

m 

0 

0 

P 

II 

m 



1 1 

o 

3 

u 

n 

z 

K 

I 

Z 


1- 

X 

Z 

o 

X 



* 



b— 

3 

H 



ab 


0 

QC 

z 

0 

o 

— 


0 

* 



ab 


4 

4 


z 

0 






1 1 

o 

0 

o 


aa 


1- 

UJ 

o 

0 

H* 

0 

o 

H 

o 


* 

H 

|| 


a 

Z 


H 

>- 

z 

X 

H 

0 

X 

NO 


0 

0 

* 

o 


aH 


— 

— » 

o 

w 

m 

0 

0 

z 



1 1 

H 

z 

_l 

A 

o 

H 


I 

0 

|| 


X 

— i 


II 


* 

» 


O 

3 

l-H 


/\ 

ab 

0 

H 

0 

X 

1- 

o 

P 

M 

0 

* 

rs 


n 


0 

0 

i— 

0 


<1 

Z 

0 



1 1 

M3 

M 

■ a 


ab 

+ 


h- 

o 

# 

•H 

H- 

o 

3 

0 


* 

N 

& 

z 

+ 

QC 



X 

X 


II 

H 


•H 

z 

aa 

0 

* 

o 


ab 


P 

<1 

o 

4 

z 

2> 


X 



1 1 


0 

* 

^b 

> 

_l 

H 


o 

N 

+ 


n 

u. 




N 

N 

b-t 

.-b 

0. 


— 


1- 


» 


0 

0 

< 

b— 


* 

CM 


o 




0 

:> 

0 

|| 


H 



1 1 

II 

D 

N • 

ab 

V 

A 

-J 

n 

N 

-J 

•H 


3 

u. 


0 


N 

CL 

3 

aa 


» 

0 


A 

N 


II 


o 

3 

z 

* 

n 


m 


P 

H 


ii 

X 

M 





1 1 



N 

n 

X 

4 

<i 




V 

A 

z 

II 

M 


o 

Z 


1- 

* 

o 


a 

h- 

H 

<1 

N 

A 

V 

z 

—t 


CL 




ab 


<r 

z 

aa 

0 

1- 

P 

P 

— 



1 1 

0 

h- 


■W 




<1 

z 

Z 

4 

«T 

0 

& 

aa 


u 

0 

Z 

0 

3 

ab 



<r 

/A 



<1 

4 

0 

s. 


D 

Ifl 

z 


— H 


0 

4 


Z 



z 

0 



1 1 

X 

Z 

1- 

o 

UJ 

P 



UJ 

UJ 



X 

M 

— 


M 

I 

0 

II 

ab 

> 


o 

u 

<1 

P 

Z 



I 



H 

* 

0 


n 


CL 

aa 

X 

aa 

CM 


4 

Z 



1 1 

0 


Z 

0 

H 

Z 

p 

p 

I 

X 

P 

P 

1- 

H 

3 

z 

a: 

H 

X 

• 

5* 

ab 


0 

o 


z 

0 

P 

P 

H* 

* 

3 

0 

r 

I 


ab 



Mb 

0 

Mb 

H 

Mb 





1 ft 1 


X 

M 

4 

<1 

4 

z 

z 

h- 

H 

Z 

Z 




QC 

UJ 


H 

o 

P 

X 


<r 

0 

p 

<1 

X 

z 

Z 


N 

ab 

QC 

u 

H 


o 


aa 

CM 

0 

CM 

A 

CM 

Mb 

0 



1 Oi 1 

P 

X 

QC 


u 


•i 

<1 



4 

4 

n 

X 

3 

D 

z 

O 


0 

z 





z 


H 


<1 

n 

N 

* 

aa 

<b 



K) 



ab 

CQ 

ab 


ab 

o 

P 

ft 


1 L 1 

z 


CL 

P 

o 

rs 







-< 

o 

ab 

1- 

D 

/A 

-1 


1 


bb 

p 

z 

« 

IS 




H 


N 

l? 


a-t 


ab 


CM 

0 


n 

0 

a-( 

II 

/A 

Z 


1 0 1 

4 

aa 

aa 

z 

J 

N 


0 

-i 

IS 

0 

IS 

A 


» 

UJ 

Z 

V 


z 

0 



z 

0 


CM 

I\ 

0 

cs 

A 

0 

N 

P 




H 

o 


ab 

Z 

ab 

z 

ab 


M 

<t 


1 L 1 



o 

<r 



0 


N 

N 

N 

N 

V 

3 

N 

CL 



v* 

0 




<i 

I 

0 

— < 

CM 

CM 

CM 

V 

4 

ab 

z 

* 

II 


n 



ft 0 

ft 


ft 

<1- 

P 

4- 


1 L 1 

m 

CM 

ab 


z 

II 

u 

II 

|| 

II 

II 

II 



N 

aa 

♦ 

b-b 

b«. 

I 



# 


H 

II 

II 

II 

II 

|| 


2> 

H 

< 

* 



ab 

o 

o 

N 

I 

N 

CL 

N 



ft 


1 0 1 
1 1 

m 

CM 

> 

3 

UJ 




a 

a 

a 

b-a 

b-. 

3 

ab 

S 

* 

# 

# 

I- 

0 

0 

H 

3 


-b 

— 

— 

»-b 

b-b 

— b 

bb" 


o 

* 

J< 


0 

CM 

H 

N 

h* 

N 

O 

N 

p 

CL 

0 



ab 

3 

X 


» 



» 

# 


# 


•H 

3 

* 

N 

N 


z 

1- 

D 

3 

J 



» 

# 

# 

<# 

# 

X 

o 


M 

CM 

CM 

n 




v 



o 

O 

z 


1 1 

H 

n 

X 

K 

1- 

w 

m 

n 

m 

n 

n 

m 

m 

II 


II 

▼ 

N 


o 

n 

<c 

0 

II 

II 

a 

a 

a 

a 

a 

a 

a 

H 

H 

* 

0 

a-t 

ab 


a-t 

ft 

M3 

# 


ft 

z 


+ 


1 1 



» 



— 

— 



— • 


w 


QC 

b-b 

* 


— 

II 

o: 

u 

z 

* 

N/ 







i— 

0 

'N, 

* 

<1 

a— 

a-t 

0 

II 

P 

0 

p 

V 

P 


Ml 

ft 


1 1 

x 

0 

UJ 

4 

_l 

u 

o 

u 

u 

CJ 

u 

u 

u 

» 

1- 

•H 

* 

-1 

z 

i? H 

o 

M 

<r 

<r 

u 

o 

u 

u 

o 

u 

0 

Z 


* 

0 

0 

n 

CL 

4 

M 

V 

►H 


M 

z 

V 

M 

z 

1 1 

X 

i- 

H 


II 

0 

0 

0 

0 

0 

0 

0 

0 

>-( 

0 

ab 

$ 

<t 

0 

P 

0 

J 

II 

— » 


0 

0 

0 

0 

0 

0 

ii 

H 

ft 

* 


P 


o 

4 

z 

Z 

z 

0 

z 

4 

M 

P 

CL 

1 1 

0 

4 

4 

** 

V 



<i 


<i 

4 

<r 

<1 

1- 

Z 

0 

* 

> 

j 

z 

n 


# 

b- 

p 



<r 


<r 

4 


11 

N 

* 

0 


<r 

H 


II 

<r 

II 

Z 

II 

•bM 

P 

II 

D 

1 1 


U 

U 












M 

•* 

* 




» 


m 


z 







» 

0 

N 

* 

V— 1 

z 

i- 

0 

X 

ft 


ft 


ft 



ft 

H 

1 1 

0 

o 


O IL U. 

J H Q M 

z 

o o <r o 

O CM 

H H /n H 
0 0-0 
ro ro o to = 


i 

o <t o 
roller 

"H <X -4 

O .. o 
to = to 


o in o 
in in M3 


o o o 
to to to 


ii 

0 

o 
o 

CM 

O O O O 

ro to to n 


o o 

is c D 


ft * 

N - * 
N 

- O O 
ft -i O 
P CM O 
m O *h 
M to 


U. Ii IL O 

H M H U. 


U.<XliliiilililiN 

b-4 MMMMMMN 


0 
4 

ooinoooo>o-ooooooino^ 
-i n n n ^ in ^ .NocDihOHNnrot" 

0000000 J 0 00 - 4 - 4 - 4 - 4 - 4 - 4 # 

nnnnnnioxnvnnnnrtnnniL 


h <1 ID o Z Ii 
P Q X X <t w 


UJ 

(0 

O 


Ui u. 

z m 


H IL Ii N 111 
Q H h N q: 


ooooooooooooooooooooooooooooo 

m(DOH(V|r)^iO'|]MD(NOHNr)<j|n'(10D[SO’HNtOt'ON(D 

-4-40000000000-4-4-4-4-4-4-4-4-400000000 

hhNNNNNNNNNNNNNNNNNNNOOOOOOOO 

rorotorotonntorotororororototoionnroninininininioinio 


>o 

oo 

ft 

X 

X 

u 


1 







1 1 


























ft 

z 









* 

<1 

* 

0 

o 

1 







1 £ 1 




<r 





o 






u 



1 l 








0 

Mb 









* 

0 

Me 

a— 

o 

1 







1 Q 1 




<c 














1 1 




aa. 




X 

0 





aab 




* 

0 

* 

ft 

o 

ft 1 




ft 







— 





0 






0 



1 l 




Mb 




u 

0 





Mb 




* 

« 

* 

0 

a -4 

0 1 




0 



1 ft 1 




ft 





4 






<t 



1 l 




IS 










rs 




* 

H 

* 

Z 

n 

*i 1 




0 



1 ill 1 




"T 





:> 









1 1 


»9k 


0 


a a. 


H 

aa 



aab 


CO 




* Z * 

b-b 


Ifl 1 







1 £ 1 




U 





— 









l l 






Mb 


Z 




Mb 


—a 


Mb 


* 

<1 

* 

0 

z 

X) 1 




t— 



i a i 




— 





ft 






s 



i l 


0 


ft 



N 

Mb 

o 



o 


ft 


-4 


* 

0 

* 

J- 

0 

1 




z 



1 £ 1 




0 





CO 






3 t 



l l 


0 


0 


0 

l 

0 

■b 



Ch 


0 


th 


* 


* 

0 

X 

(b i 




n 



1 M I 




> 





X 






* 



l i 


— 


I 


— 

8 « 

0 

4 



— 


X 


a— 


♦ 

Z 

Me 


J- 

T» 1 




0 



1 1 




U 





z 



ft 



a 



l i 


ft 


u 


ft 

0 


4 



ft 


u 


ft 


* 

0 

* 

II 


1 




0 



1 111 1 




—* 














l i 


0 

CM 



0 

0 

aa 




0 

CM 



0 


* 


* 


3 

ifl 1 







1 1 




ft 





II 



z 



3 C 



l l 


X 

1 

+ 


X 

4 - 


-4 



I 

1 

4 - 


I 


* 

CO 

Me 

ft 

£ 

H | 




aa 



1 Ifl 1 




0 











* 



l i 


u 




u 

> 

o 

1 



o 

J« 



o 


* 

o 

? 

N 

3 

-H | 










H 

t~ 




— t 

Mb 



»- 


0 




l l 



-J 

Mb 




ab 

.M 




0 

Mb 




* 

0 

Me 

N 

H 

Ifl 1 


a 

ft 

o 



1 3 1 



•H 

CO 




— i 

<1 



2 



* 



1 0 1 


+ 

U 

— b 


4 - 

o 


0 



4 - 

U 

a-b 


4 - 


* 

E 

Me 


ft 

4 J 1 



CO 

ab 



1 *J 1 







ft 


<1 



b-b 


+ 

* 



1 0 1 




*- 



1 - 

<1 

U 





-M 




♦ 

<t 

Me 

Z 

b-b 

£ 1 


o 

0 

> 






o 

II 



-t 

O 

-M 



.a* 



* 



1 X l 


Mb 

o 

ft 


Mb 


ab 

4 - 


O 

M 

o 

ft 


M. 


* 

o 

Me 

0 

H 

Ifl 1 


i- 

ab 

«b 



C £ 1 

M« 


H 




2 


ft 


~b 

0 

0 

4 

3 



l O 1 

o 

•H 

H 




H 

X 

X 


ab 

a-» 

1- 

0 


a 4 


f 


Me 

I 


0 1 



> 

X 



i U 1 

ft 



Mb 





z 


ft 



4 

0 



i a i 

ab 

— 


X 


•— 

4 - 




<E 

■— 


I 


ba 


* 

0 

Me 

1- 

0 

1 


— < 

ab 




1 ft 1 



— i 

4 



11 


o 


-b 

aa 

O 

ab 

z 



i i 

>- 

ft 

-H 

L) 


ft 

> 

0 

0 


<1 

ft 


D 


ft 


* 

p 

* 


O 

Ifl 1 



X 

0 



! 0 1 

0 

ft 


4 







0 


1- 

0 

M 



i i 

ab 

0 




0 


H 

1- 


ab 

0 




0 


* 


M« 

3 


-*-l 1 


ii 


H 



» 1 

-M 

o 

11 

— 



ft 

il 

H 


— 

T 


-H 

CO 



! 1 

X 

X 

II 

1- 


I 

II 

<C 

4 


X 

X 

ii 

1- 


I 


* 

o 

Me 

3 

3 

3 1 



p 

<r 




0 

z 


ft 

<c 


O 


0 

4 

J 

ab 

-» 


D 



1 1 


u 


Z 

<1 

u 


u 

O 

<X 


u 


Z 

<1 

u 


Me 

*■> 

Me 


z 

n i 

« 


4 

u 

4 

2 

1 ifl 1 

4 


4 


<1 


z 

<E 

0 

4 

,4 

-H 


0 




1 i 

0 


<t 

M 

4 


<r 

o 

3 


0 


4 

b-b 




* 

0 

Me 

II 

3 

■M | 



0 

o 


•V 


•> 

II 

4 

U 




sC 

0 


> 

— b 

:i 

1 - 

i- 



i 1 

J- 

»- 

4 

0 


f” 

4 

0 

0 


H 

£- 

4 

0 


K 


* 

z 

M« 


II 

P t 

P 


0 

0 

H 

5 

1 1 1 

ab 




M- 


r- 



1- 




«t 

z 

it 


1 I 

<t 

z 


0 

H 

z 




V- 

<1 

2 


0 

h- 

Z 

z 

* 

4 

Me 

ft 

ft 

1 

4 

CL 



}< 

j- 

1 +> i 

— « 

ft 

0 


x 

2 

0 

0 


X 

-h *? 

0 

4 : 

u 

b— b 

4 

2 

1 1 

u 

►H 

0 



Mb 

0 



X 

O 

b-b 

X 


X 

b—b 

0 

* 

Z 

Me 

N 

M 

1 

0 

O 



0 

0 

1 U 1 

It 

-1 

O 


0 

0 

0 

O 


u 

* 0 

r- 

<c 

o 

0 


0 

1 1 

o 

0 

O 


0 

0 

o 



0 

O 

0 

O 


0 

0 

D 

* 


Me 

N 

h- 

1 

X 

0 



Z 

0 

• ill 


2 

0 


Z 

D 

0 

0 


z 

:*) 



0 

0 

1 - 

o 

1 1 

0 

0 

0 


Z 

0 

0 



Z 

0 

0 

0 


z 

0 

1- 

* 


Me 




ft 

N 

N 

z 

UJ 

_l 


ft 

N 

N 


ft 

N 

N 

Z 

UJ 

X 












1 


b 


0 





0 





3 

0 


o ;5 


0 

0 


- 


- 

- 

















0 






b—b 

►4 

b-b 

- 

» 

- 

4 

* 

* 

'• 

















0 

“ 





0 


0 u. 


z 

0 

- 

3 

o 

•3 

o 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

O 

o 

o 

o 

O 

o 

o 

o 

o 

o 

m 

o 

o 

o 

o 

o 

O 

O 

o 

o 

O 

o 

o 

o 

j 

o 

o 

o 

3 

o 

o 

O 

o 

o 

o 

o 

O 

O 3 

O 

o 

o 

O 

O 

O 

O O 3 

3 

o 

3 

o 

O 

—4 

CM 

to 

CM 

to 


10 

M3 

IS 

• 0 

Mb 

T 

rs 

CM 

rO 


in 

M3 

IS 

CD 

cs 

o 

«-4 

N 

to 

ro 


in 

MJ 

IS 

0 

Ch 

• 4 

N 

n 

in 

>0 

rs 

CO 

(S 

o 

o 

o 

-4 

•N 

n 

3 

CM 

*r 

Ul 

•o 

IS 

O -< 

CM 

n 

-1- 

’•3 

0 

O 

H ij t 

rf) 

03 

CS 

3 

3 

o 

O 

o 

a-b 

— b 

•-b 

a-b 

H 

aH 

Mb 

N 

N 

CM 

er 

M- 

«r 


*T 

ef 

T 

'f 

o 

o 

o 

o 

o 

o 

o 

O 

o 

o 

o 

o 

O 

o 

o 

o 

o 

o 

o 

-4 

r -l 

G 

O 

O 

0 

a-i 

-4 

— b 

— b 

-4 

-*b 

CM N 

CM 

CM 

M 

n 

CM 


M r) ) 

» ) 

:3 

n 

ef 

3 

o 

O 

o 

O 

o 

o 

o 

o 

o 

3 

O 

o 

o 

o 

O 

o 

o 

O 

o 

O 

o 

o 

o 

o 

o 

o 

O 

o 

O 

o 

o 

o 

in 

m 

!i3 

tn 

in 

in 


(0 

•n 

uo 

0 

aO 

0 

sO 

0 

>•3 

0 

0 

M3 

M3 

•0 *0 

0 

0 

•0 

o 

M3 

M3 

M3 0 '0 

0 

0 

0 

0 

-4 

ab 

Mb 

H 


-4 

—4 


-* 

-1 

-b 

-4 

-< 

-4 

«-b 


-4 

*b 

Mb 


-4 

b-b 

n 

n 

to 

n 

ro 

to 

to 

to 

ro 

to 

r» 


P6g. 14 



CONCURSO MENSUfiL BASIC TUTOR. 


Auspiciado por TELEMATICA S.A. fabricante en Argentina de las computadoras 

personales TALENT MSX 

Para participar en este certamen deben senalar cual es la information correcta que presenta cada 
item. Junto con las respuestas deben remitir los datos en el correspondiente cupon. Los premios 
se entregaran en la administration de la editorial. Los que no puedan concurrir pueden solicitar 
el envio pagando el franqueo contrareembolso. Los premios podran ser reclamados dentro de los 

120 dfas despues de haber sido anunciados. 

■ 

Ganador del MSX-TEST N 2 * * 5 1 

Ruben P. Papazian Pcia. de Cordoba 


Respuestas correctas: 


1-6rea de hooks. 2-El lenguaje Basic de IBM. 3-lndica cuantos caracteres contiene una 
expresion alfanumdrica. 4-9. 5-Prueba de escritorio. 


MSX-TEST N s 5 - CIERRE I s DE JULIO DE 1988 


1. £Cudl es el material bbsico 
para construlr chips? 

a. aluminio 

b. cobre 

c. silicio 

2. £Qu 6 es FAT? 

a. Tabla de ubicacion de archivos 

b. Tiempo de acceso de archivo 

c. Sector principal del archivo 


3. ^Cu^l de estos tres pares de 
sentencias no conforman un 
ciclo? 

a. WHILE/DO 

b. REPEAT/UNTIL 

c. WHEN/NEXT 

4. £Cu£ndo se ejecuta mds 
r^pido un programs? 

a. Esta compilado 


b. Es interpretado 

c. Las opciones a) y b) tardan lo 
mismo. 

5. iC6mo se llaman los Puestos 
de Atencibn Servicio 
ACAMATICA? 

a. SERVIACA 

b. PASA 

c. TELEACA 


Nombre y apellido_ 
Dircccidn: 


Documento:. 


.Edad; 


_Maquinaj_ 


Que es lo que mis me gusta de la revista:. 
Que le agregaria:. 


Que es lo que no me gusta:. 
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EXPECTATIVA DE 

VIDA Clase: Educativo 


Con este programa, basado 
en la experiencia cientifica 
1 sobre el tema, podremos cal- 
1 cular hastaque edadhabi- 
< taremos este suelo. 


.€ 


ste programa no pretends dar- 
le ilusiones de inmortalidad ni 

tampoco amargarle la vida al 

usuario, pero por lo menos nos hace re- 
flexionar sobre las causas probables de 
mortalidad y asi tratar de poner freno a 
las tensiones cotidianas. 

Esta basado en un estudio estadlstico 
con miles de casos analizados y logra el 
proposito de entretener, ademas de ser 
didactico. 

Su uso es muy sencillo. Una vez carga- 
do, coloquemos el teclado para ser usa- 
do en mayusculas, y luego es cuestion 
de responder a las diferentes preguntas 
que nos efectua el programa. 

Sobre la base de nuestra edad actual y el 
sexo se calcula una edad base de la que 
se empiezan a sumar o restar anos de a- 



cuerdo con las contestaciones a las si- 
guientes preguntas. 

El formulario esta dividido en cuatro par- 
tes. La primera tiene que ver con la he- 
rencia (enfermedades de nuestros ante- 
pasados, causas de muerte, etcetera). 
En la segunda las preguntas se refieren 
a nuestra dieta y alimentacion. Aqui nos 
puede sorprender alguna variacion no i- 
maginadadel resultado parcial. Todo tie- 
ne su explicacion, y el programa la dara 


si es preciso. 

La parte tres se refiere a la educacion y 
ocupacion, mientras que la ultima esta 
dedicada a nuestro estilo de vida. 

Una aclaracion: el programa esta hecho 
para personas mayores de veinte anos, 
no por capricho sino que esa es la base 
cientifica tomada. 

Esperamos que sean sinceros al respon- 
der las preguntas y tengan larga vida. 


5 WIDTH 37 : KEYOFF 

10 CLS : PRINT TAB (10) "« 

LIFETIME »" 

20 PRINT: PRINT "TRABE LAS 
MAYUSCULAS": PRINT: FOR 1=1 

TO 200: NEXT I 

30 PRINT : PRINT "ESTE PRO- 
GRAMA DETERMINA SU EXPECTATI- 
VA DE VIDA" 

40 PRINT : PRINT "UD. DESEA MAS 
INFORMACION" ; 

50 LINE INPUT "? ";A$ 

60 IF LEFT$ (A$ , 1 ) ="N" THEN 
150 

70 PRINT 

80 PRINT "LA SIGUIENTE EX- 
POSICION ESTA BASADA " 

90 PRINT "SOBRE LA MEJOR 
EVIDENCIA CIENTIFICA " 

95 PRINT "DEL MOMENTO." 

98 PRINT 

100 PRINT "MIENTRAS LOS CIEN- 
TIFICOS NO HAN DES- CUBIERTO 
TODAS LAS VARIABLES QUE 
PRO-"; 

110 PRINT "LONGAN LA VIDA, 
ELLOS SE HAN ACERCADO A 
ALGUNOS DE LOS FENOMENOS QUE 
ESTAN" ; 


120 PRINT "RELACIONADOS CON LA 
LONGEVIDAD." 

125 PRINT 

130 PRINT "ESTE PROGRAMA ESTA 
BASADO SOBRE ESOS DATOS Y 
COMIENZA CON INDIVIDUOS 
A " 

14 0 PRINT "PARTIR DE LOS 20 A%OS 
DE EDAD." 

150 DIM B1 (101) 

160 PRINT : PRINT "CUAL ES SU 
EDAD EN A%OS" ; 

170 INPUT A9 

180 IF A9>1 9 THEN GOTO 190 ELSE 
PRINT "LO LAMENTO, UD. DEBERA 
CONTAR CON MAS DE 
20 A%OS DE EDAD." : 
PRINT"PRESIONE UNA TECLA" 

185 A$= INPUT$ ( 1 ) : CLOSE : RUN 
190 PRINT : PRINT "CUAL ES SU 
SEXO"; 

200 LINE INPUT "? ";S$ 

210 FOR 1=0 TO 101 
220 READ B1(I) 

230 NEXT I 
240 C=A9-20 

250 IF LEFT$ (S$, 1) ="F" THEN 
C=C+51 

260 DATA 69.9, 70.0, 70.1, 


70.2, 70.3, 70.4,70.5, 70.6, 

70.7, 70.8 

270 DATA 70.9, 70.9, 71.0 

,71.1, 71.2, 71.3, 71.4, 

71.5, 71.6, 71.7 

280 DATA 71.8, 71.0, 72.0, 

72.2, 72.3, 72.5, 72.6, 72.8, 

73.0, 73.2 

2 90 DATA 73.4, 73.6, 73.8, 

74.1, 74.3, 74.6, 74.9, 75.2, 

75.5, 75.8 

300 DATA 76.2, 76.5, 76.9, 

77.3, 77.7, 78.1, 78.6, 79.0, 

79.5, 79.9 
310 DATA 80.4 

320 DATA 77.0, 77.0, 77.1, 

77.1, 77.2, 77.2, 77.3, 77.3, 
77.4 

330 DATA 77.4, 77.5, 77.5, 

77.5, 77.6, 77.6, 77.7, 77.8, 

77.8, 77.9 

340 DATA 78.0, 78.0, 78.1, 

78.2, 78.3, 78.4, 78.5, 78.6, 
78.7, 78.9 

350 DATA 79.0, 79.1, 79.3, 

79.4, 79.6, 79.7, 79.9, 80.1, 

80.3, 80.5 

360 DATA 80.7, 80.9, 81.2, 

81.4, 81.6, 81.9, 82.2, 82.4, 
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82.7, 83.0 
370 DATA 83.3,83.6 
380 PRINT : PRINT "SU EXPECTA- 
TIVA BASE DE VIDA ES 
STR$ (B1 (C) ) ; " A%OS" 

390 PRINT :T=B1(C) 

395 FOR AA= 1 TO 1000 : NEXT 
AA 

400 CLS 

405 GOSUB 2680 

410 PRINT "PARTE I - HEREN- 

CIA" 

420 GOSUB 2680 
430 PRINT : PRINT "TUVO DOS 
ANTEPASADOS QUE HAYAN 
VIVIDOHASTA LA EDAD DE 80 O 

MAS 

\\ . 

/ 

450 LINE INPUT "? ";A$ 

460 IF LEFTS (A$ , 1 ) ="N" THEN 
PRINT T A B ( 1 0 ) ; T ; " + 0 

="; T : GOTO 490 

470 PRINT TAB (10) ;T; "+ 2 

=" ; T+2 
480 T=T+2 
490 PRINT 

500 PRINT "CUAL ES/FUE LA 
EDAD DE SU MADRE"; 

510 INPUT A 

520 IF A<8 0 • THEN PRINT 
TAB (10) ; T; "+ 0 =";T:GOTO 540 
530 PRINT TAB (10) ;T;"+ 1.5 

="; T+l . 5 : T=T+1 . 5 
540 PRINT 

550 PRINT "CUAL ES/FUE LA 
EDAD DE SU PADRE"; 

560 INPUT A 

570 IF A<80 THEN PRINT 
TAB (10) ; T ; " + 0 =";T:GOTO 590 
580 PRINT TAB (10) ; T ; " + 2 

=" ; T+2 : T=T+2 
590 PRINT 

600 PRINT "TUVO ALGUN 
ANTEPASADO, PARIENTE, HERMA- 

ft . 
f 

610 PRINT "NO/A, QUE HAYA 
FALLECIDO DE UN ATAQUEAL 
CORAZON O PRESION ARTERIAL AN 
TES " 

620 PRINT "DE LOS 50 A%OS"; 
630 LINE INPUT "? ";A$ 

640 IF LEFTS (A$, 1)="N" THEN 
PRINT TAB (10) ; T ; " - 0 

=";T:GOTO 670 

650 PRINT TAB (10) ;T ; " - 4 

="; T-4 
660 T=T-4 
670 PRINT 

680 PRINT "TUVO ALGUN PARI- 
ENTE MUERTO, DE LOS YAMEN- 
CIONADOS, POR LAS MISMAS CAUS 
AS" 

690 PRINT "ANTES DE LOS 60 
A%OS"; 

700 LINE INPUT "? ";A$ 

710 IF LEFTS (AS, 1)="N" THEN 
PRINT TAB (10) ; T; 0 
="; T : GOTO 740 


720 PRINT TAB (10) ;T; 2 =";T- 
2 

730 T=T-2 
740 PRINT 

750 PRINT "CUAL FUE EL NUMERO 
TOTAL DE INCIDEN-" 

7 60 PRINT "TES DE DIABETES, 
DESORDENES EN TIROI- 
ROIDES, CANCER DE MAMAS 

(MUJERES) 

// 

t 

770 PRINT "CANCER EN SISTEMA 
DIGESTIVO, ASMA, Y" 

780 PRINT "BRONQUITIS CRONICA 
ENCONTRADA EN PA- RIENTES Y 
ANTEPASADOS" 

790 INPUT A 

800 PRINT TAB (10) ; T ; " - ( 3 

X"; A; ") «";T-3*A 

810 T=T-3*A : PRINT 

815 FOR AA= 1 TO 1000 : NEXT AA 

818 CLS 

820 GOSUB 2680 

830 PRINT "PARTE II - DIETA Y 
ALIMENTACION" 

840 GOSUB 2680 
850 PRINT 

860 PRINT "CUANTOS 'KILITOS' DE 
MAS POSEE"; 

870 INPUT A 

880 IF A=0 THEN B=0:GOTO 900 
890 B=A/10 

900 PRINT TAB (10) ; T ; " - 
" . b . " . *p _ b 
910 T=T-B 
920 PRINT 

930 PRINT "CUANTOS PAQUETES DE 
CIGARRILLOS FUMA DIARIAMENTE" ; 
940 INPUT A 

950 IF A=0 THEN B=0:GOTO 1030 
960 IF A<1 THEN B=2 : GOTO 1030 
970 IF A=1 THEN B=3:GOTO 1030 
980 IF A<=1 . 5 THEN B=5 . 5 : GOTO 
1030 

990 IF A<2 THEN B=7:GOTO 1030 
1000 IF A=2 THEN B=8:GOTO 1030 
1010 IF A<3 THEN B=10:GOTO 1030 
1020 B=12 

1030 PRINT TAB (10) ; T ; " - 
" ; B; "=" ; T— B 
1040 T=T-B 
1050 PRINT 

1060 PRINT "CUANTA BEBIDA ALCO- 
HOLICA CONSUME POR DIA (EN 
LITROS ) " ; 

1070 INPUT A 

1080 IF A=0 THEN PRINT 
TAB (10) ; T ; " - 1 =";T-1:T=T- 

1 : GOTO 1110 

1090 IF A<=2 THEN PRINT 
TAB (10) ;T; "+ 3 

=" ; T+3 : T=T+3 : GOTO 1110 
1100 PRINT TAB (10) ;T;"- 8 =";T- 
8 : T=T-8 

1110 PRINT :E$="UD. DESEA UNA 
EXPLICACION DE ESTO": PRINT ES; 
1120 LINE INPUT "? ";A$ 

1130 IF LEFTS (AS, 1)="N" THEN 


1200 

1140 PRINT 

1150 PRINT "BEBIENDO MOD- 
ERADAMENTE (HASTA DOS VASOS 
POR DIA) REDUCE EL STRESS 
Y LA MALA DIGESTION." 

1160 PRINT 

1170 PRINT "BEBER EN EXCESO 
PRODUCE DANOS FISIO-"; 

1190 PRINT "LOGICOS, DEPRE- 
SION, ETC." 

1200 PRINT 

1210 PRINT "UD. REALIZA EJER- 
CICIOS MODERADAMENTE 
(AEROBISMO, GOLF, LARGAS 
CAM I NAT 

AS, NADAR) 2 0 3 VECES POR 
SEMANA"; 

1230 LINE INPUT "? ";A$ 

1240 IF LEFTS (AS, 1)="N" THEN 

PRINT TAB (10) ;T; "+ 0 

=" ; T : GOTO 1260 

1250 PRINT TAB (10) ; T; "+ 3 

=" ; T+3 : T=T+3 

1260 PRINT 

1270 PRINT "CUANTAS HORAS 
DUERME POR DIA"; 

1280 INPUT "? "; A 
12 90 IF A<9 THEN PRINT 
TAB (10) ; T ; " - 0 =";T:GOTO 

1320 

1300 IF A=9 THEN PRINT 
TAB (10) ; T ; " - 4 =";T-4:T=T- 

4: GOTO 1320 

1310 PRINT TAB (10) ;T; 6 

=" ; T-6 : T=T-6 

1320 PRINT : PRINT E$; 

1330 LINE INPUT "? ";A$ 

1340 IF LEFTS (AS, 1)="N" THEN 
1390 

1350 PRINT : PRINT "ADULTOS 
QUE DUERMEN MUCHO, USAN DEMA- 
S I ADAS HORAS EN ACTIVIDA 
DES NO FISI-" 

1360 PRINT "CAS, SON INFE- 
LICES Y DUERMEN COMO ES-CAPE 
DE ELLO." 

1370 PRINT "LAS PERSONAS 
DEPRESIVAS TIENEN EXPEC-TA- 
TIVA DE VIDA MAS CORTA." 
1390 PRINT 

1400 IF LEFTS (S$, 1) ="F" AND 
A9<=30 OR LEFTS (S$, 1)="M" 
AND A9<=40 THEN 1550 
1410 IF LEFTS (S$, 1)="M" THEN 
1490 

1420 PRINT "UD. REALIZA EX- 
AMENES DE MAMAS Y PAPA-NICO- 
LAU (MUJERES) , POR LO MENOS 
UNA VEZ AL ANO" 

1440 LINE INPUT "? ";A$ 

1450 IF LEFTS (AS, 1)="N" THEN 

PRINT TAB (10) ;T; " + 0 

=" ; T : GOTO 14 70 

1460 PRINT TAB (10) ; T; "+ 2 

=" ; T+2 : T=T+2 

1540 PRINT 

1550 FOR AA=1 TO 1000 : NEXT 


Pag. 17 


AA 

1554 CLS 

1558 GOSUB 2680 

1560 PRINT "PARTE III - EDU- 

CACION Y OCUPACION" 

1570 GOSUB 2680 
1580 PRINT 

1590 PRINT "COMENZANDO DESDE 
PRIMER GRADO INFE- RIOR, CUAL 
ES EL NUMERO DE ANOS 
QUE HA PERMANECIDO EN LA 
ESCUELA"; 

1610 INPUT "? A 

1620 IF A<12 THEN PRINT 

TAB (10) ; T; 2 =";T-2:T=T- 

2 : GOTO 1660 

1630 IF A<14 THEN PRINT 

TAB (10) ; T; "+ 0 =";T:GOTO 16 60 
1640 IF A<17 THEN PRINT 

TAB (10) ;T;"+ 1 

=" ; T+l : T=T+1 : GOTO 1660 
1650 PRINT TAB (10) ; T; "+ 3 

=" ; T+3 : T=T+3 
1660 PRINT : PRINT ES; 

1670 LINE INPUT "? ";A$ 

1680 IF LEFTS (A$, 1) ="N" THEN 
1730 

1690 PRINT : PRINT "MAYOR CAN- 
TIDAD ANOS CURSADOS NO HAR- 
ANSU VIDA MAS LARGA, PERO 
MAYOR EDUCA- CION ESTA RELA- 
CIONADO "; 

1710 PRINT "CON MAYORES 
OPORTUNIDADES DE INCREMENTAR 
SUS IN- GRESOS Y ACCEDER 
A UN MEJOR NIVEL DE VIDA" 
1730 PRINT 

1740 PRINT "SU OCUPACION ES 
CALIFICADA COMO PRO- 
FESIONAL"; 

1750 LINE INPUT "?";A$ 

1760 IF LEFTS (A$, 1) ="N" THEN 
1810 

1770 PRINT "ES UD . MUSICO, 
ARQUITECTO O FARMACEU-TICO"; 
1780 LINE INPUT "? ";A$ 

1790 IF LEFTS (AS, 1) ="N" THEN 
PRINT T A B ( 1 0 ) ; T ; " + 2 

=" ; T+2 : T=T+2 : GOTO 187 0 
1800 PRINT TAB ( 10 ) ; T; 1 
; T-l : T=T-1 : GOTO 187 0 
1810 PRINT "UD. TRABAJA EN 
TAREAS PESADAS"; 

1820 'PRINT "COCINERO U OB- 
RERO" 

1830 LINE INPUT "? ";A$ 

1840 IF LEFTS (AS, 1) ="N" THEN 
1860 

1850 PRINT TAB (10) ;T; 2 
=";T-2 :T=T-2 .-GOTO 187 0 
1860 PRINT TAB (10) ;T; "+ 0 

=" ; T 

1870 PRINT :PRINT E$; 

1880 LINE INPUT "? ";A$ 

1890 IF LEFTS (AS, 1) ="N" THEN 
1970 

1900 PRINT : PRINT "PROFESION- 
ALES USUALMENTE VIVEN MAS 


ANOS, EXCEPTO ARQUITECTO 
S Y FARMACEU-TICOS. " 

1920 PRINT "UD. TIENE UNA MAYOR 
POSIBILIDAD DE ACCI DENTARSE 

SI REALIZA TAREAS 
RIES- GOSAS O PESADAS." 

1940 PRINT "PERSONAS QUE ESTAN 
ASOCIADAS A TARE- AS DE ALIMEN- 
TACION TIENEN UNA M 
ENOR EXPECTATIVA DE VIDA." 
1970 PRINT 

1980 PRINT "ES SU INGRESO ANUAL 
SUPERIOR A A 40.000"; 

1990 LINE INPUT "? ";A$ 

2000 IF LEFTS (AS, 1)="N" THEN 
PRINT TAB (10) ; T ; " - 0 =";T:GOTO 
2020 

2010 PRINT TAB (10) ;T; "- 2 = ";T- 
2 :T=T-2 

2020 PRINT : PRINT E$; 

2030 LINE INPUT "? ";A$ 

2040 IF LEFTS (AS, 1)="N" THEN 
2070 

2050 PRINT : PRINT "PERSONAS CON 
MAYOR INGRESO USUALMENTEEX- 
PERIMENTAN STRESS Y CO 
NSUMEN MAS SEDANTES." 

2070 PRINT 

2080 PRINT "SU TRABAJO ES AC- 
TIVO O SEDENTARIO" ; 

2090 LINE INPUT "? ";A$ 

2100 IF LEFTS (AS, 1)="A" THEN 
PRINT T A B ( 1 0 ) ; T ; " + 3 

="; T+3 :T=T+3: GOTO 2120 
2110 PRINT TAB (10) ;T;"- 3 =";T- 
3 : T=T-3 
2120 PRINT 

2130 IF A9<61 THEN 2180 
2140 LINE INPUT "SE ENCUENTRA 
UD. TRABAJANDO ";A$ 

2150 IF LEFTS (AS, 1)="N" THEN 
PRINT TAB (10) ; T; "+ 0 =";T:GOTO 
2170 

2160 PRINT TAB (10) ;T; "+ 2 

="; T+2 : T=T+2 
2170 PRINT 

2180 FOR AA=1 TO 1000 : NEXT : 
CLS 

2185 GOSUB 2680 

2190 PRINT "PARTE IV - ESTILO DE 

VIDA" 

2200 GOSUB 2680 
2210 PRINT 

2220 PRINT "UD. VIVE EN UN AREA 
RURAL O URBANA"; 

2230 LINE INPUT "? ";A$ 

224 0 IF LEFTS (AS, 1)="R" THEN 
PRINT TAB (10) ;T;"+ 1 

=" ; T+ 1 : T=T+ 1 : GOTO 2260 
2250 PRINT TAB (10) ;T; "- 1 =";T- 
1 :T=T-1 
2260 PRINT 

2270 PRINT "ESTA UD. CASADO O 
VIVIENDO CON AL- GUIEN SOBRE 
UNA BASE E STABLE" 

2290 LINE INPUT "? ";A$ 

2300 IF LEFTS (AS, 1)="S" THEN 
PRINT TAB (10) ; T ; " + 3 


="; T+3 :T=T+3: GOTO 2370 
2310 A=A9-25 

2320 IF A<=0 THEN A=0:GOTO 
2360 

2330 PRINT "CUANTOS DE LOS 
PASADOS" ; STRS (A ) ; " A%OS PASO 
EN SOLEDAD"; 

2340 INPUT "? A 
2350 A=A/10 

2360 PRINT TAB (10) ; T ; " - 
"; A; "=" ; T-A: T=T-A 
2370 PRINT 

2380 PRINT "EN UNA ESCALA DE 
0 A 3, QUE GRADO DE CALMA O 

PASIVO SE CONSIDERA UD. 

\\ 

2390 PRINT "(3 ES EL MAS 
CALMO) 

2400 INPUT A 

2410 PRINT 

TAB ( 1 0 ) ; T ; "■ + " ; A; "=" ; T+ A : T=T+A 
2420 PRINT 

2430 PRINT "EN UNA ESCALA DE 
0 A 5, CUANTO DE A- GRESIVO, 
INTENSO Y COMPETITIVO 
SE CONSIDERA UD ( 5 ES EL 
2450 PRINT "MAS AGRESIVO, IN- 
TENSO, Y/O COMPETITIVO)"; 
2460 INPUT A 

2470 PRINT TAB (10) ; T ; " - 
"; A; "="; T-A: T=T-A 
2480 PRINT 

2490 PRINT "CONDUCE SU AUTO 
USANDO CINTURONES DE SEGURI- 
DAD Y RESPETA LOS LIMITES 
DE VE LOCI DAD"; 

2510 LINE INPUT "? ";A$ 

2520 IF LEFTS (AS, 1)="N" THEN 
PRINT TAB (10) ; T ; "+ 0 

=" ; T : GOTO 254 0 
2530 PRINT TAB (10) ; T; "+ 1 

=";T+1 :T=T+1 

2540 PRINT 

2550 PRINT "SOBRE LA 
SIGUIENTE ESCALA, COMO SE 
CONSIDERA" 

2560 PRINT 

2570 PRINT " FELIZ: 321 
0 -1 -2 -3 zINFELIZ" 

2580 PRINT TAB (12) ; 

2590 INPUT A 

2600 IF A>=0 THEN PRINT 
TAB (10) ;T;"+";A; "=";T+A:T=T+A:GOTO 
2620 

2610 PRINT TAB (10) ; T ; " ; ( - 
A) ; "=" ; T+A : T=T+A 
2620 PRINT : PRINT 
2630 GOSUB 2680 
2640 PRINT TAB (8) ; "SU EXPEC- 
TATIVA DE VIDA ES: 
"; STRS (T) ; " A%OS. ";TAB (58) 
2650 GOSUB 2680 
2655 AS = INPUTS (1) 

2658 CLOSE : RUN 

2660 PRINT : PRINT : PRINT 

2680 PRINT STRINGS (37, "-") 

; : RETURN 
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■ PASAJE DE 
UNIDADES 


Clase: Educativo 
Autor: Humberto Gonzalez 


ste programa presenta las op- 
K| ciones para resolver en pocas 
lineas el tema del pasaje de u- 
nidades. El alum no trata de resolverlo y, 
en caso de que conteste mal, se le pre- 
sentara una ayuda, explicando que es lo 
que debe hacer para llegar al resultado 
correcto. 

Con este programa, util para la escuela 
primaria, mostramos como sacar prove- 
cho de las decisiones multiples. 

En muchas oportunidades necesitamos 
romper la secuencia de un programa pa- 
ra pasar a otro tramo del mismo. 

Con el comando GO TO lo podemos lo- 
grar, aun cuando no existe condicion al- 
guna paraque se produzca el salto dese- 
ado. Luego del GO TO debemos poner el 
numero de linea al que queremos pasar. 
Si existe alguna condicion para pasar de 
un tramo a otro del programa se puede u- 
tilizar la instruction IF.. .THEN..., que nos 
brinda la posibilidad de tener dos salidas: 
una si la condicion es verdadera y la otra 
si es falsa. 



Pero ocurre que muchas veces necesita- 
mos mas de dos salidas en una decision 
y solemos caer en el errorde acumular IF 
cuando tenemos una posibilidad mucho 
mas rica a nuestro alcance. 

Se trata de la decision o bifurcacion mul- 
tiple. La misma tiene esta forma: 

ON (expresion) GOTO n1,n2 nn 


donde losdiferentes“n”son los numeros , 
de linea a los que el programa debe ir si 
la expresion vale 1 ,2, etcetera. 

La expresi6n puede ser una unica varia- 
ble o una expresibn aritmetica (A/B), 
(A+2*C), etcetera. Si el resultado esfrac- 
cionario, se toma la parte entera. 
Dependiendo del valor que toma la ex- 
presion el programa ira a uno de los tan- 
tos numeros de linea. Por ejemplo, en el 
siguiente programa, si A vale 1 pasara a 
la linea 30, si vale 2 
a la 40, si vale 3 a la 
30ysivale4ala50. 
10 INPUTA 
20 ON A GOTO 
30,40,30,50 
30 B=A*2: GOTO 60 
40 B=A/2: GOTO 60 j 
.50 B=A+2 

60 PRINT B : 

El programa que i- 1 
lustra esta nota utili- 
za decisiones multi- • 
pies para resolver ' 
en pocas lineas el ' 
tema de pasaje de 
unidades. Analizan- 
dolo veremos una 
de las formas de utilizacion de la instruc- 
cion 


Variables 

V: valor numerico 
U: unidad del valor numerico 
P: unidad a la que queremos pasar 
R: resultado estimado por el alumno 


4 CL.S: KEY OFF 

5 PRINT " KM= 1 , HEC=2 , DAM=3 , M=4 , DM 
=5 , CM= 6 , MM=7 " 

6 PRINT 

10 INPUT " INGRESA: VALOR Nrico,UN 
I DAD, UN I DAD A PASAR " ; V , U , P 

11 PRINT 

15 INPUT "INGRESA: RESULTADO" ;R 
20 ON U GOTO 30,40,50,60,70,80,9 
0 

30 ON P GOTO 1 00 ,110,1 20 , 1 30 , 1 40 
, 150,160 

40 ON F* GOTO 170,100,110,120,130 
, 140,150, 

50 ON P GOTO 180,1 70 , 1 00 ,110,1 20 
, 130, 140 

60 ON P GOTO 190,1 80 , 1 70 , 1 00 ,110 
, 1 20 , 1 30 

70 ON P GOTO 200 , 1 90 , 1 SO , 1 70 , 1 00 

,110,120 

80 ON P GOTO 210200,190,180,170, 
1 00 , 1 1 0 

90 ON P GOTO 220,210,200,190,180 
,170, 100 
100 END 

110 0—9*10: GOTO 230 
120 G=9* 100: GOTO 230 
130 G=V* 1000: GOTO 230 
140 6-9*10000: GOTO 230 
150 G— 9*100000 ! : GOTO 230 
160 6=9* 1 000000# : GOTO 230 
170 G=9/ 10: GOTO 230 


180 6=9/ 100: GOTO 230 

190 6=9/ 1000: GOTO 230 

200 G=9/ 10000: GOTO 230 

2 1 0 8=9 / 1 00000 ! : GOTO 230 

220 G=9/ 1000000#: GOTO 230 

230 IF R=G THEN LOCATE 12, 12: PR I 

NT " FEL I C I T AC I ONES " ELSE 240 

232 J*= INKEY* 

234 IF JS="" THEN 232 
236 GOTO 4 

240 CLS: LOCATE 6,1: PRINT *'KM HEC 
DAN M DM CM MM" 

250 ON U GOTO 260,270,280,290,30 
0 ,310, 320 

260 C$= " 1 — 0 0 0-0 — O — 0 " : GO 

TO 340 

270 C*= " 0 — 1 0 0-0 — 0 — O " : GO 

TO 340 

280 C*= " 0 — O 1 0-0 — 0 — 0 " : GO 

TO 340 

290 C$= " O — 0 O 1 -0 — O — 0 " : GO 

TO 340 

300 C*="0 — 0 0 0-1 — 0 — 0" : GO 

TO 340 

3 1 0 C*= " 0 — 0 0 0-0 — 1 — 0 " : GO 

TO 340 

320 C*= " 0 — 0 0 0-0 — O — 1 " : GO 

TO 340 

340 LOCATE 6,2: PRINT C* 

350 ON P GOTO 360,370,380,390,40 
0,41 O , 420 

360 F*="KM -n 


“ : GOTO 430 

370 F*="HEC D 

" : GOTO 430 

380 F*="DAM D 

*' :60T0 430 

390 F^'-'M D 

" :GOTO 430 

400 F*= " DM D 

" :GOTO 430 

410 F*="CM D — 

" : GOTO 430 

420 F*="MM 

D" : GOTO 430 

430 LOCATE 3,3: PRINT F* 

440 LOCATE 5,5: PRINT "TENES QUE 
MULT I PL I CAR POR" 

450 LOCATE 5,7: PRINT "EL Nx QUE 
TE DA LA TABLA " 

460 LOCATE 5,9: PRINT " (ATENCION 
CON LA C0MA-D7" 

470 J*= INKEY* 

480 IF J*="" THEN 470 
490 CLS 

500 PRINT " KM= 1 , HEC=2 , DAM=3 , M=4 , 
DM=5,CM=6,MM=7" 

510 PRINT 

520 PRINT "9AL0R Nrico" ,9 
530 PRINT "UNIDAD " ,U 

540 PRINT "UNIDAD A PASAR " 5 P 
570 GOTO 11 
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MANEJO DE ARCHIVOS DESDE MSX BASIC: 

, .Archivos secuenciales. (Primera parte) 

l Nos hart llegado algunas consultas sobre el 
\manejo de archivos desde MSX Disk BASIC 
i que se podrian resumir en una sola: el manual 
no especifica con un ejemplo que englobe todo 
, lo referente al manejo de archivo y no trae un 
curso sobre este tema. 



n efecto, no trae un curso (como 
tampoco lo trae el MSX BASIC) 
pues la idea del manual es que sirva de 
referencia para el usuario ya experimen- 
tado en el manejo del BASIC o archivos. 
Con esta nota trataremos de explicar 
mas en detalle el uso de archivos en el 
entorno MSX. 

Los espanoles traducen el vocablo “file” 
de una forma mas acertada que la que u- 


samos en nuestro medio: los llaman fi- 
cheros en lugar de archivos. 

En efecto, se puede pensar que un archi- 
vo es un fichero que posee fichas, y que 
estas fichas tienen los datos que desea- 
mos almacenar (y luego recuperar). 
Supongamos que tenemos un fichero 
con datos de los clientes de una empre- 
sa, donde constan los siguientes items: 

Nombre: 

Direccion: 


Codigo Postal:.... 

Local idad: 

Provincia: 

Telefono: 

Una ficha comun tendria estos datos es- 
critos (preimpresos) de manera tal que el 
encargado de mantener el fichero actua- 
lizado solo tiene que completar los luga- 
res en bianco. 

Comencemos a definir algunos 
conceptos. 

Cada uno de los items incluidos en cada 
ficha se denomina “campo”. Por ejem- 
plo, tenemos el campo “Nombre”, el 
campo “Direccion”, etcetera. 

El nombre del campo es la identificacion 
que el usuario le da a ese conjunto de ca- 
racteres que forman el dato en cuestion, 
mientras que el contenido es el dato pro- 
piamente dicho. 

Por ejemplo, nuestro fichero tiene un 
campo que se llama “Nombre”, y este 
nombre es fijo para todos los registros. 
Sin embargo, el contenido del campo 
“Nombre” varia en cada caso, pudiendo 
ser “Juan Perez” o “BaireSoft S.A.”. 

Un conjunto de campos forman loquese 
llama registro. En nuestro caso equivale 
a una ficha. 

Finalmente, un conjunto de registros for- 
man un archivo (o sea el fichero). 



CAPITAL FEDERAL 

Centro Cultural de la Ciudad de Buenos 
Aires 

Taller Logo de computacion 
Junin 1930 

Fundacidn de Informatica y Educacion 
Centro de Computacion Clinica 
Asistencia al Usuario Discapacitado 
Ramsay 2250 - Pabellon F 
Tel. 784-2018 

Barrio Norte 

Uriburu 1063 - Tel. 83-6892/826-6692 


Flores 

Gral. Artigas 354 - Tel. 612-3902 
Palermo 

Guatemala 4733 - Tel. 71 -41 24 
San Telmo 

Chile 1345 - Tel. 37-0051 al 54 
GRAN BUENOS AIRES 

Castelar 

C. Casares 997 - Tel. 629-2247 
Lanus 

Caaguazu 2186 - Tel. 247-0678 


Moron 

Belgrano 160 - Tel. 629-3347 
Quilmes 

Moreno 609 - Tel. 253-6086 al 89 
Ramos Mejia 

Bolivar 55 - ler. piso - Tel. 658-4777 
San Isidro 

Av. Centenario 705 - Tel. 743-9678/747- 
6094 

Vicente Lopez 

Av. Maipu 625 - Tel. 797-6720 
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Si hicieramos un listado del contenido de 
un fichero completo, seguramente utili- 
zarfamos las columnas para indicar el 
contenido de un campo y cada renglon 
seria un registro. Por ejemplo: 


Listado de clientes 

Nro. Nombre Direccion 


001 Alberto Perez Balcarce 50 

002 Juan Garcia Av de Mayo 1 

003 Talent Computation Chile 1347 


Como vemos, la analogfa entre un fiche- 
ro y un archivo de computadora es total. 
Hasta ahora hemos visto la manera en 
que se organiza la Information dentro del 
archivo. Pero a esa information se debe 
acceder y esta debe ser grabada de al- 
guna forma para que pueda ser procesa- 


da. 

Existen dos metodos disponibles desde 
MSX Disk BASIC (con unidad de discos): 
*- Archivos secuenciales. 

*- Archivos “random” o relativos. 

En el caso de no disponer de una unidad 
de discos, los unicos archivos disponi- 
bles son los secuenciales. En este nu- 
mero nos dedicaremos a este tipo de ar- 
chivos. 

ARCHIVOS SECUENCIALES. 

Estos archivos se llaman asf puesto que 
los registros deben ser leldos en forma 
consecutiva, o sea primero leemos el re- 
gistro 1 , luego el registro 2, etcetera, has- 
ta llegar al registro que deseamos obte- 
ner. 

Los archivos que se pueden almacenar 
en cinta son de este formato por limitacio 
nes propias de la cinta. El caso es total- 
mente analogo al de un casete de audio, 


que debemos rebobinar hasta llegar al 
tema deseado, pasando previamente 
por todos los temas que lo preceden. 
Para poder grabar y recuperar informa- 
cion almacenada en un casete o disque- 
te, el MSX BASIC provee varias senten- 
ces especificas. 

Los pasos a seguir para poder grabar da- 
tos en un archivo secuencial son los si- 
guientes: 

1 ) Abrir el archivo. 

Tal como harlamos con un fichero co- 
mun, lo primero que tenemos que hacer 
es abrir el archivo (en el caso del fichero, 
abrirfamos el caj6n que lo contiene...). 
La sentencia que utiliza el MSX BASIC 
es OPEN. Esta sentencia cumple varias 
tareas, a saber: 

*- Inicializa el dispositivo para que luego 
reciba (o transmita) los datos. 

*- Asigna al numero indicado el archivo 
descripto por la sentencia. De esta for- 
ma, toda operation de entrada/salida 


puede referirse al “archivo Nro. 1 ” por e-, ! 
jemplo, y no al archivo "CAS:PEPE”. Es 
to simplifica la operatoria del programa. 
*- Define el modo de operation del archi- 
vo (INPUT, OUTPUT o APPEND). 

En nuestro ejemplo crearemos un archi- 
vo que posea los numeros del 1 al 30. 

El comando que incorporaremos al pro- 
grama sera: 

40 OPEN “PEPE” FOR OUTPUT AS#1 
donde “PEPE” es el nombre del archivo 
OUTPUT es la modalidad del archivo se- 
cuencial que graba los datos en el mismc 
(destruyendo todo dato que pudiese ha- 
ber estado almacenado en el mismo) y 
#1 indica que el archivo Nro. 1 es en re- 
alidad el archivo PEPE. 

2) Grabar los datos. 

Para grabar datos en este archivo, debe 
mos utilizar la sentencia PRINT# c 
PRINT# USING. 

Esta sentencia se utiliza en forma total- 
mente anaioga al ciasico PRINT de pan 


Virreyes 

Avellaneda 1697 - Tel. 745-7963 


INTERIOR DEL PAIS 

Bahia Blanca - Buenos Aires 
Gral. Paz 257 - Tel. (091) 31582 


Necochea - Buenos Aires 
Calle 61 No. 2949 

Comodoro Rivadavia - Chubut 

San Martin 263 Local 22 - Tel. (0967) 

20794 

Cordoba - C6rdoba 
9 de julio 533 


Mendoza - Mendoza 

Rivadavia 76 - ler. piso - Tel. (061 

291348/293151 


Rosario - Santa Fe 
Bar6n de Maua 1088 


La Plata - Buenos Aires 

Calle 48 Nro. 529 - Tel. (021) 249905 al 

07 


Villa Marla - COrdoba 

Corrientes 1 159 - 2do. piso - Tel (0535) 

24311 


Santa Fe - Santa Fe 

Rivadavia 2553 Loc.22 - Tel. (042) 

41832 


Mar del Plata - Buenos Aires 

Av. Luro 3071 - 13 “A” - Tel.(023) 43430 


Parana - Entre Rios 
Corrientes 381 - Tel. (043) 225987 


S.M.de Tucuman - Tucuman 
Bolivar 374 - Tel. (081) 245007 
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alia, con la diferencia de que se debe in- 
iicar el Nro. de archivo a donde debe di- 
igirse la informacion. 

^quf debemos hacer una disquisicion. 
.os archivos secuenciales permiten que 
;e almacene cualquier tipo de dato den- 
ro de diferentes registros. Es decir, po- 
friamos (si queremos ser un poco des- 
>rolijos) almacenar en primer registro un 
lumero, luego un alfanumerico, poste- 
iormente dos ndmeros, etcetera. Esto 
se debe a que el archivo secuencial per- 
nite que los registros sean de longitud 
variable. 

Siguiendo nuestro ejemplo, para escribir 
os datos que deseamos seria: 

50 FOR 1=1 TO 30 

50 'Aqui grabamos los datos creados 
7 0 PRINT #1 , l:PRINT I 
30 NEXT I 

3) Cerrar el archivo. 

: inalmente, para que el archivo quede 
grabado y desconectado, deberemos u- 
ilizar la sentencia CLOSE. En nuestro e- 
emplo tenemos: 

100 CLOSE #1:END 
3ien. Este es nuestro primer programa, 
gue permite la creacibn de un archivo 
3 EPE con los numeros del 1 al 30: 

Listado 1 : 

1 0 'Programa que graba PEPE 
20 ‘Apertura del archivo secuencial 
30 'en modo grabacion (OUTPUT). 

40 OPEN “PEPE” FOR OUTPUT AS #1 
50 FOR 1=1 TO 30 

30 'Aqui grabamos los datos creados 
70 PRINT #1,I:PRINT I 
30 NEXT I 
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90 'Close se encarga de cerrar y almace- 
nar los datos pendientes. 

100 CLOSE #1:END 

Siguiendo con este ejemplo, podemos 
generar el programa que lee los datos 
que hemos creado en el programita ante- 
rior. 

Nuevamente, deberemos seguir una se- 
cuencia preestablecida, a saber: 

1 ) Abrir el archivo. 

Igual que en el caso anterior, debemos 
abrir el archivo para poder usarlo. En es- 
te caso deseamos leer un archivo ya cre- 
ado, que posee una cantidad x de datos 
(supondremos que no sabemos cuantos 
son, aunque en realidad son 30...). 

Para ello, el modo a indicar en la senten- 
cia OPEN es INPUT (entrada), de modo 
tal que la sentencia de apertura del archi- 
vo seria: 

40 OPEN “PEPE” FOR INPUT AS #1 

2) Leer los datos. 

Para poder leer los datos, debemos veri- 
ficar si realmente hay datos para leer, a 
fines de evitar que se genere el error “In- 
put past end” (lectura despues del fin de 
archivo), y una vez hecha esta verifica- 
cion, recien utilizar la sentencia corres- 
pondiente a la lectura de datos. 

Como ya habra sospechado el lector 
perspicaz, si para escribir datos en un ar- 
chivo usamos PRINT#, para leer datos 
del mismo utilizamos el comando IN- 
PUT#. De esta forma, para leer los datos 
que grabamos en el programa anterior, 
podriamos hacer lo siguiente: 

90 INPUT #1,I:PRINT I 

Vemos que el INPUT se realiza desde el 

archivo ( #1 ) y que el PRINT es el comun 


de pantalla, para visualizar el dato recien 
leido. 

Pero anteriormente dijimos que debe- 
mos verificar si el archivo no ha llegado al 
final. Esta verificacion la realiza la fun- 
cion EOF(<Nro. archivo). El parametro 
(lo que escribimos entre parentesis) de 
esta funcion le indica a cual de los archi- 
vos abiertos se refiere el programador. 
En nuestro caso, ingresariamos la si- 
guiente sentencia: 

70 IF EOF(1) THEN 130 
Y en la linea 1 30 haremos lo de costum- 
bre cuando finalizamos las tareas con el 
archivo: 

3) Cerrar el archivo. 

130 CLOSE#1:END 
Nuestro programa de captura de datos 
desde el archivo PEPE (creado en el e- 
jemplo anterior) sera: 

Listado 2: 

10 'Programa que lee PEPE 
20 ‘Apertura del archivo secuencial 
30 'en modo lectura (INPUT). 

40 OPEN “PEPE” FOR INPUT AS^I 
50 'Funcion EOF(1): controls si 
60 'el archivo 1 finalizo 
70 IF EOF(1) THEN 130 
80 'Aqui leamos los datos grabados 
90 INPUTS 1 ,1:PRINT I 
100 ' Volvemos a chequear el fin de ar- 
chivo 

110 GOTO 70 

1 20 'Close se encarga de cerrar y alma- 
cenar los datos pendientes. 

130 CLOSE#1:END 
Finalmente existe otro modo de abrir un 
archivo de acceso secuencial: el modo 
APPEND o agregar. 

Este modo permite agregar al final del ar- 
chivo ya existente, mbs datos. 

La metodologfa empleada en el progra- 
ma para manejo del modo APPEND es i- 
dbntico al del modo OUTPUT, por lo que 
simplemente agregaremos el listado 
pertinente: 

Listado 3: 

10 ‘Programa que lee PEPE 
20 ‘Apertura del archivo secuencial 
30 ‘en modo grabacion al final (AP- 
PEND). 

40 OPEN “PEPE” FOR APPEND AS#1 
50 FOR 1=50 TO 100 
60 'Aqui grabamos los datos agregados 
70 PRINT#1,I:PRINT I 



80 NEXT I 

90 'Close se encargade cerrary almace- 
nar los datos pendientes. 

100 CLOSE #1:END 

En este caso, a continuacion del nume- 

ro 30, seguira el numero 50 dentro del 


archivo hasta el numero 1 00. 

Para verificar el contenido del archivo 
PEPE al finalizar la ejecucibn del ultimo 
ejemplo, podemos utilizar el programa 
del Listado 2 (modo INPUT) para visua- 
lizar los datos ya existentes y los agrega- 


dos. 

En el prbximo numero concluiremos con 
esta breve introduction al manejo de ar- 
chivos, pero mas especificos al uso del 
Disk BASIC: los archivos “random” o re- 
latives. 


INFOTALENT EN ACAMATICA 


Desde mediados del aho pasado esta- 
mos brindando a los usuarios de Talent 
MSX un servicio de consulta telefonica a 
traves del telefono 38-6601 InfoTalent, 
tambien conocido como "Hot Line”. 

A partir del mes de abril ampliamos este 
servicio de consultas ofreciendo una al- 
ternativa atraves del Banco de Datos del 
ACA, ACAmatica. 

Nuestra identidad dentro del mismo es: 
T10003. Los invitamos a comunicarse 
con nosotros mediante la utilizacion del 



Correo Electrbnico de ACAmatica, ACA- 
mail. 

Las consultas tecnicas y pedidos de in- 
formation en general seran contestados 
dentro de las 48 horas de emitido el co- 
rrespondiente ACAmail. 

Estamos estudiando la posibilidad de 
prestar un servicio similar a traves de Si 
glo XXI y de Century 21 , con el agregadc 
de boletines intormativos y lafacilidad de 
rescatar programas y archivos de datos. 


CONTESTANDO A LA HOT-LINE: 


dBASE TRAVIESA 

Soy usuario del dBASE II y me encontre 
con el siguiente problema: 

Resulta ser que yo ingrese al dBASE y 
me puse a cargar unos datos que actua- 
lizaban mi base de datos. Luego de ello, 
le pedi que me listara los registros que 
cumplfan con una condition, y me dio 
DISK FULL. Incluso intente salir con 
QUIT para cerrar el archivo, y tambien 
me dio DISK FULL. 

Finalmente, apague el equipo, y al volver 
a cargar la base, me comenzo a dar RE- 
CORD OUT OF RANGE (registro fuera 
de rango). ^Como lo soluciono? 
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ATENCION ! 


LIBROS Y PROGRAMAS PARA 
COMODORE - MSX - SPECTRUM 
ATARI - AMSTRAD Y GENERALES. 


DATA BECKER 


EL N.°1 EN 
INFORMAT 1C A 


OFERTA TODO SU CATALOGO ,A PRECIOS ESPECIALES 
DIRECTAMENTE A TODOS LOS USUARIOS DE COMPUTADORAS 
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Respuesta: 

1 Lo que sucedio es que el dBASE perdio 
I ilgunos punteros y la base de datos se 
corrompio”, o sea, no se puede seguir u- 
1 ando en ese estado. 

I J ara solucionarlo existe una funcion 
. magica”: PACK. Este comando no solo 
1 >orraf isicamente los registros marcados 
; >ara tal fin, sino que ademas vuelve a 
( :alculartodos los punteros de la base so- 
' ucionando el problema. Por lo tanto, los 
i :omandos a usar son: 

USE da base de datos en cuestion> 

'pack 

.uego de ello, la base volvio a la norma- 
idad. Como acotacion final queda una 
ecomendacion: una vez que se actuali- 
:a la base de datos, se debe grabar el ar- 
:hivo antes de utilizar cualquier otro co- 
nando. Si noqueremos hacerQUIT, ha- 
jamos la siguiente secuencia: 

Estando en modo edicion, se pulso 
<CTRLxW>. 

yolviendo al modo comando, escribir: 

;use 

tEste comando cierra el archivo, actuali- 
zandolo. Si queremos continuar operan- 
do.volvamos a escribir: 

.USE <su base de datos> 


Iadrones 

I 

Soy usuario de la Talent TPC-310 y el 
53ASIC tiene 28815 como siempre... 
^Donde estan los 128 kbytes? 


Respuesta: 

Estan en la maquina a la espera de da- 
)os. Para utilizarlos, se debe recurrir al 
x>digo de maquina o al RAM-Disk incor- 
Wado, ya que el BASIC no puede ma- 
^ejarlos. Esto se debe a que si el BASIC 
Sermitiera paginacion, la velocidad de e- 
lecucion se verfa notablemente dismi- 
nuida... Sin embargo, podemos utilizarlo 
muy facilmente. A continuacion incorpo- 
'•amos un listadito de un programa que 
termite "POKEar” y "PEEKear” valores 
^Imacenados en la RAM dejada libre por 
al BASIC (los 32 kbytes de abajo). Para 
|jsar los otros 64 kbytes, mas adelante 
Eiaremos indicaciones al respecto. 
iistado: 

]l 00 'Acceso a memoria en slots 
^ 10 ' 

=120 SCREEN 0:WIDTH 38:KEY OFF 

? 130DEFUSR0=&HDFFF 

5 150 FOR 1=0 TO 55:READ D$ 



160 POKE &HE000+ l,VAL ("&H”+D$): 

NEXT 

170 ' 

180 PRINT 

190 INPUT “SLOT NO. (0-3) “;S% 

200 POKE &HE036,S% 

210 INPUT "Escribe (0) o Lee(1) “;C% 
220 POKE &HE035,C% 

230 INPUT “Direccion (0000-8FFFH) 
";A% 

240 A%=VAL("&H”+A$) 

250 IF A%<0 AND A%>-16385 THEN 
230 

260 IF C%>0 THEN 300 
270 INPUT “Ingrese valor (00-FFH) “;D$ 
280 D%=VAL(“&H”+D$):POKE 
&HE037, D% 

290 ' 

300 D=USR(A%) 

310 ' 

320 IF C%=0 THEN PRINT “OK”:GOTO 
180 

330 PRINT: D$= RIGHTS ("0”+ HEX$ (D) 

. 2 ) 

340 PRINT "Valor= “;D$:GOTO 180 
350 ' 

360 DATA E5,D5,C5,F5,FE,02,20,28 
370 DATA 23,23,5E,23,56,E5,EB,3A 
380 DATA 36,E0,E6,03,F5,3A,35,E0 
390 DATA B7, 28, 06, FI, CD, 0C, 00, 18 
400 DATA 09,3A,37,E0,5F,F1 ,CD,14 
410 DATA 00,AF,E1,36,00,2B,77,FB 
420 DATA FI ,C1 ,D1 ,E1 ,C9,FF,00,00 
Si algun memorioso duda si este progra- 
ma ya lo vi6, en efecto, hace un par de a- 
nos salio publicado en K64. Volvemos a 
publicarlo aqul ya que los nuevos usua- 


rios no se dieron por enterados de este 
programa (hace dos ahos no teman la 
maquina...). 

DESMEMORIADA 

^Existe alguna forma para que la unidad 
de discos me libere memoria? 

Respuesta: 

Como bien dice en el manual de uso de 
la unidad de discos (en Castellano), para 
liberar memoria en el BASIC se debe pul- 
sar la tecla <CTRL> cuando se enciende 
el sistema. Con esto se cancela el simu- 
lador de la segunda unidad, liberando 
1,5 kbytes aproximadamente. Ya que 
estamos, podemos decir que si se pulsa 
la tecla <SHIFT> en las mismas condi- 
ciones, se cancela la unidad de discos. 

HACIENDO TRAMPAS 

^Existe alguna manera de "engafiar” a la 
maquinay hacer CALL SYSTEM aunque 
no haya inicializado el sistema con un 
disco con el MSX-DOS? 

Respuesta: 

Si. Hay que ingresar la siguiente senten- 
cia en el modo comando: 

POKE &HF346.255 

Luego de esto, podremos hacer CALL 
SYSTEM sin problemas. 

CENTROS DE ASISTENCIA AL USUA- 
RIO DE TALENT MSX 


APRENDE SOLO 


a capacidad de autoaprendizaje 
| es una de las virtudes del si- 
guiente programa, capaz de ha- 
cer deducciones a partir de datos que se 
le proporcionan. 

Mucho se ha hablado sobre la capaci- 
dad de aprendizaje de las computado- 
ras, e incluso se las hace aparecer en las 
pelfculas como sistemas omnipotentes y 
con ansias de dominacion. 

La realidad es sustancialmente diferen- 
te. Un sislema capaz de pensar y/o to- 
mar decisiones es de muy diffcil realiza- 
cion. 

El presente ejemplo es una muestra muy 
sencilla de este tipo de programas. 

Para una utilizacion del mismo debemos 
teclear en respuesta a los requerimien- 
tos de entrada de datos lo siguiente: 


NOMBRES: 5 
CUALIDADES:3 

NOMBRES (del 1 al 5):MICKEY, DO- 
NALD, TWEETY, SILVESTRE, PINK 
PANTHER 

CU ALIDADES (del 1 al 3):DISNEY, A- 
LAS, ROSA 

El programa luego harb una serie de 
preguntas y dara sus respuestas. En ca- 
so que de este equivocado le tendremos 
que dar la correcta. Esta informacibn se 
incorpora a sus datos para que no se re- 
pita el error. 

Creemos que este puede ser un buen e- 
jemplo, y de facil comprension, para ani- 
marse a entrar en el diffcil mundo de la in- 
teligencia artificial. 


CLASE: EDUCATIVO 



100 CLS 

110 INPUT "CUANTOS NOMBRES 
NOMBRES 

120 INPUT "CUANTAS 
CUAL I DADES " ; UAL 
130 X-NOMBRES+UAL 
140 DIM A$ (NOMBRES) : DIM 
F$ (UAL) : DIM B (X) 

150 FOR J-l TO NOMBRES 
160 J$— STR$ ( J) 

17 0 PRINT "NOMBRE XX ;J$; 

180 INPUT A$(J) 

190 NEXT J 
200 CLS 

210 FOR J-l TO UAL 
220 J$=STR$ ( J) 

230 PRINT xx CUAL I DAD XX ;J$; 
240 INPUT F$ ( J) 

250 NEXT J 
1000 CLS 

1010 PRINT "POSIBLES ELE 


MENTOS" 

1020 FOR J-l TO NOMBRES 
1030 PRINT A$ ( J) 

1040 NEXT J 

1050 PRINT "RESPONDA S/N" 

1060 CUENTA— 0 
1070 X- . 5 

1080 FOR J-l TO UAL 
1090 X-X+X 

1100 PRINT XX SU CUAL I DAD ES 
xx ; F$ ( J) ; " ?"; 

1110 INPUT Z$ 

1120 IF Z$-"S" OR Z$-"s" THEN 

CUENTA-CUENTA+X 

1130 NEXT J 

1140 X=0 

1150 FOR J-l TO NOMBRES 
1160 IF CUENTA— B ( J) THEN X-J 
1170 NEXT J 

1180 IF XO0 THEN 12 60 
1190 X-INT (RND (- 


TIME) ^NOMBRES) +1 
1200 FLAG-0 

1210 FOR J-l TO NOMBRES 
1220 IF B ( J) — 0 THEN 1240 
1230 IF X-J AND 
CUENTAOB ( J) THEN FLAG-1 
1240 NEXT J 

1250 IF FLAG-1 THEN 1190 
1260 PRINT "ESTABAS PEN 
SANDO EN xx ; A$ (X) ; " ?"; 

1270 INPUT Z$ 

1280 IF Z$-"S" OR Z$="s" 
THEN B (X) — CUENTA: GOTO 1000 
1290 INPUT XX CUAL ERA LA 
RESPUESTA CORRECTA XX ;Z$ 
1300 FOR J-l TO NOMBRES 
1310 IF A$ ( J) — Z$ THEN 
B(J) -CUENTA 
1320 NEXT J 
1330 GOTO 1000 


P4rr 



LA AVENTURA DEL 
PENSAMIENTO 

I 

El desarrollo de software requiere de un proceso de varias e- 
tapas. A traves de un ejemplo, un programa que hace graficos 
de barras, ofrecemos las experiencias de un grupo de jovenes 
sobre el tema. 



n varios artfculos periodfsticos 
se ha sehalado el riesgo que 
f conlleva el uso inadecuado de 
las nuevas tecnicas derivadas de la mi- 
croelectronica, dentro de las cuales pue- 
de incluirse la computacion personal. 

EL PENSAMIENTO 
REFLEXIVO 

La fascinacion que otorga la rapidez y e- 
xactitud con que se efectuan procesos 
numericos y no-numericos, y la sensa- 
cion de poder que surge del uso de estos 
modernos artefactos electronicos, pue- 
de llevar en sus mismas entranas un ve- 
lo que oculte la aptitud mas importante 
del ser humano: el pensamiento reflexi- 
vo. 

El temor que ha sido puesto de manifes- 
to, por los autores de los artfculos que 
mencionabamos al principio, esta dado 
por suponer que el uso de computadoras 
lleve a eliminar lo poco que aun resta del 
habito de pensar. Adem&s esto ha sido a- 
limentado por la asociacion que se hace 
inconcientemente: computadoras - vide- 
ojuegos, y por el hecho de que los prime- 
ros pasos se dieron en gran medida, de la 
mano de quienes provenfan del area de 
Sistemas (analistas, programadores, 
etcetera) y no de verdaderos docentes. 
Quienes nos dedicamos a la diffcil tarea 
de iniciar a jovenes y adultos en el uso de 
las microcomputadoras hogarehas, no 
podemos perder de vista la importancia 
que la meditacion y la reflexion poseen 
para las mentes de los "aprendices", 
cualquiera sea su edad, ni tampoco el he- 
cho de que "la meditacion rehuye la pri- 
sa”. 

Es por ese motivo que personalmente 
trato de no apurar el desarrollo de una 
clase en aras del formal cumplimiento de 
un cronograma preelaborado. Tampoco 
de pasar por alto las inquietudes que j6- 
venes y adultos plantean en el transcur- 
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so del aprendizaje, cuando una vez que 
se han ambientado en mi modesto taller, 
se animan a cuestionar sobre la utilidad o 
la importancia de cada paso que se da, 
sobre la estructura de algun procedi- 
miento, o aun sobre consideraciones es- 
teticas de los programas. 

EL GRAFICO DE BARRAS 

En el transcurso de las ultimas clases del 
ciclo de un grupo de BASIC Jovenes, al 
efecto de aplicar el tema de manejo de 
VECTORES a traves de un ejemplo sig- 
nificative, comenzamos a desarrollar un 
programa cuyaf inalidad consistfa en tra- 
zar en SCREEN2 un GRAFICO DE BA- 
RRAS. 

El ejercicio en sf no se destacaba por su 
originalidad, pero la sorpresa (mfa) fue el 
interes que despertb en el grupo, a medi- 
da que fbamos avanzando, y en las pro- 


puestas que surgfan a cada paso que 
dabamos. 

Cada pregunta o propuesta de modifica- 
cion que haefan los alumnos era tratada 
con detenimiento, analizada, MEDITA- 
DA, reflexionada en conjunto sobre la 
conveniencia o no de su incorporacion, y 
en caso de su aceptacion, se analizaba 
con sumo cuidado COMO efectuarla y 
DONDE insertarla. 

Cada paso que se daba en este sentido 
sentaba las bases de autoconfianza (ta 
vez por la valoracion que yo como docen- 
te haefa de cada propuesta o sugerencia. 
no import aba lo inusual que pareciera) e- 
los jovenes, quienes iban adquiriendo 
soltura y aplomo para nuevas instancias. 
Del proyecto original se llegb a otro bas- 
tante diferente en cuanto al nivel de ca - 
dad y profundidad del mismo. 

A este desarrollo lo llamamos con car -c 
"LA AVENTURA DEL PENSAMIENTO’ 



porque les permitio comprender que con 
imaginacidn y detenida reflexibn, sin a- 
puros, se puede lograr alcanzar un exc«9- 
lente nivel cualitativo en programacibn y, 
fundamentalmente, podemos cultivar el- 
se don tan preciado que constituye el 
pensamiento. 

EL PROGRAMA EN SI 

El programa cuenta con seis mbdulos; 
con diversos grados de dificultad y origi- 
nalidad, que en esencia permiten ingre- 
sar datos de los doce meses de un afio 
que son graficados a escala con barras 
verticales proporcionadas. 

Los aspectos mbs destacables del mis- 
mo, teniendo en cuenta el nivel de los a- 
lumnos, son: 

a) Al ingresar el TITULO del grbfico, una 
pequena rutina transforma en MAYUS- 



CULAS cualquier letra que se ingrese en 
minusculas. 


b) Admite datos numbricos NEGATI- 
VOS, que son representados con barras 
invertidas. 

c) Las barras son PROPORCIONALES 
al valor del dato correspondiente (se tra- 


baj6 a escala). 

d) El eje horizontal es DESPLAZABLE 
sobre el vertical, proporcionalmente a la 
magnitud de valores negativos. 

e) Las iniciales de cada uno de los meses 
se colocan por debajo o por encima del e- 
je horizontal, de acuerdo al signo positivo 
o negativo del valor correspondiente, pa- 
ra no interferir con las barras. 

f ) El manejo de tres modos de pantalla di- 
ferente: SCREEN 3 para el titulo, SCRE- 
EN 0 para el ingreso de datos y SCREEN 
2 para el grafico en si. 

g) La validacion sistembtica que se hizo 
en los ingresos de datos. 

h) El desarrollo estructurado del progra- 
ma y el uso adecuado de REMarks, in- 
dentado de ciclos FOR/NEXT y de IF/ 
THEN, etcetera, que facilitb notablemen- 
te la depuracion que se hizo del mismo. 

Gustavo Delflno 


100 REM ***************** **** 

105 RBX * * 

110 REX * GRAFICO DB BARRAS * 

115 RBX * * 

120 RBX ********************* 

125 RBX 

130 RBX por Silvia RODRIGUEZ 
135 REX Veronica JAIT 

140 RBX Fernando BAS I LB 

145 REX 

150 RBX Prof. Gustavo Delflno 
155 REX 

160 REX * ASIGNACIONES * 

165 REX 

170 DIX LS<30) , XS (12) 

175 DIX DAT <12) , H<12> 

180 FOR X = 1 TO 12 
185 READ XS<N) 

190 NEXT X 

195 DATA ENERO, FBBRBRO, XARZO, ABRIL, XAYO, 
JUNIO, JULIO, AGOSTO, SBTI EXBRE, OCTUBRE 
, NOV I EXBRE, D I C I EXBRE 
2.’ 10 REX *CARTEL* 

215 RBX 

220 OPEN “GRP:" AS #1 
225 COLOR 8 , 11 , 11 
2210 SCREEN 3 

2135 PSET <20, 30) , 0 : PRINT #1 , “GRAFICO". 
2? 40 PSET <96, 90) , 0 : PRINT #1,“DB" 

245 PSET <30, 150), 0 : PRINT *1, "BARRAS" 
250' IF INKEYS = "" THEN GOTO 250 
255 REX * ACOND I C I ONAK I ENTO * 

260 REX 

265 SCRBEN 0 

270 WIDTH 40 

27*5 KEY OFF 

280 COLOR 4 , 15 , 15 

285' RBX * INGRESO DE DATOS * 

290 .REX 

295 LOCATE 9,1: PRINT "GRAFICO DB BARRAS" 
300 LOCATE 0,4 : PRINT "Titulo ?" 

305 LOCATE 0,6 J INPUT CS 
310 IF CS = "" THEN GOTO 305 
315 FOR L = 1 TO LEN <CS> 

320 iLET LS <L) = XIDS <CS , L , 1) 


325" LBT COD = ASC <LS<L>> 

330 IF COD < 123 AND COD > 96 
THBN LBT COD = COD - 32 
335 LBT ZS = ZS + CHRS <COD> 

340 NBXT L 

345 LOCATB 0 , 9 : PRINT "Que afio ?" 

350 LOCATE 0 , 11 : INPUT AS 

355 IF LEN < AS) > 4 OR LEN <AS) < 2 
THEN BEBP : GOTO 350 
360 IF VAL <AS ) =0 THEN GOTO 350 
365 LET AS = " 19"+XIDS <AS, LEN <AS) - 1,2) 
370 LOCATB 0,14 : PRINT "Xarcas eje Y 7 
375 LOCATB 0,16 :' INPUT QV 
380 IF QV < 0 THEN LET QV = 0 
385 CL S 

390 LOCATE 1,1 : PRINT "Ingresa los 
DATOS correspondlentes a:" 

395 FOR XX = 1 TO 12 

400 LOCATE 2, XX + 2 : PRINT XX ; 

TAB <6) ; XS<KX) ; 

405 LOCATE 17 : INPUT DAT<XX> 

MO NEXT XX 

415 LOCATB 2 . 16 : PRINT "Algun error 
en los datos ? <S/N)” ; 

4120 LOCATE 28 : LET RS = INPUTS <1> 

4;25 IF NOT <RS = ”S" OR RS = "s") 

THEN GOTO 455 

430 LOCATE 2,18 : PRINT "En que mes ? 

<1 a 12)" ; 

435 LOCATE 25 : INPUT E 

440 IF B < 1 OR B > 12 THEN GOTO 435 

4 45 LOCATE 17 , B + 2 : INPUT DAT <B) 

4*50 GOTO 415 

455 REX *CALCULOS* 

450 RBX 

455 LET XP = 0 
47 0 LBT XN = 0 
475 FOR X = 1 TO 12 
480 IF DAT <X> >= 0 

THEN IF DAT <X> > XP 

THBN LET XP = DAT <X) 
ELSE GOTO 485 
ELSE IF ABS <DAT<X)> > MN 

THEN LBT XN = ABS <DAT 


<X)> 

485 NEXT X 

490 LET S = 0 

495 FOR X = 1 TO 12 

500 LET H <X) = DAT <X) * 140 / <XP+XN) 
505 LET S = S + H<X) 

510 NBXT X 

515 LBT P = S / 12 

520 LET L = <256 - < <LEN <CS>+5> * 8)>/2 
525 LBT X = 28 + XP * 140 / <XP + XN) 

530 LET SEG = 144 / <QV + 1) 

535 REX *GRAF ICO* 

540 RBX 

545 SCREEN 2 

550 PSET <L, 1) , 0 : PRINT *1,Z$; " " ; AS 
555 PSET <L, 3) , 0 : PRINT 41 , STRINGS 
<LEN <ZS) 1 + LBN <AS) , " ") 

560 LINE <24 , X) - <232 . X) , 1 

565 LINE <24 , 24) - <24 , 168) , 1 

570 FOR XX = 1 TO 12 
575 LINE <24 + 16 * XX , X - 2) - 

<24 + 16 * XX , X + 2) . 1 

580 NBXT XX 
585 FOR XY a 1 TO QV 
590 LINE <23 , 168 - SEG * XY) - 
<25 , 168 - SEG * XY) . 1 

595 NEXT XY 
600 FOR B = 1 TO 12 

605 LINE <24 + 16 * B - 4 , X - H<B>> 

- <24 + 16 * B + 4 , X) , 4 . BF 
610 IF DAT <B) >= 0 

THEN PSET <23 + 16 * B, X + 7),0 

ELSE PSET <23 + 16 * B, X - 14), 0 

515 PRINT *1 , XIDS <XS<B> ,1,1) 

620 NEXT B 

625 LINE <24 , X - P) - <232 , X - P) , 8 

630 LET KS = INKEYS : IF KS = "" 

THBN GOTO 630 
635 REX * RESTAURACION * 

640 REX 

645 COLOR 1 , 3 
650 CLOSE *1 
655 SCREEN 0 
660 END 


DELTA ^tron 

taller de computacion 


Director 
Gustavo O. Delfino 

651-4027 



CURSOS DE COMPUTACION 
para adultos docentes 
adolescentes y ninos 
BASIC-LOGO-UTILITARIOS 


CURSOS DE: 

Introduccion a la 


Informatica 
Programacion BASIC 
Planillas de Calculo 
Procesadorde Textos 
Bases de Datos 
Talleres LOGO para 
ninos y docentes 
Servicio Integral de 
Educacion Informatica 
a Escuelas Primarias 
Y Secundarias 
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LOS MISTERIOS DEL 

MSX-DOS (3 ra parte) 


i 

Seguimos investigando el MSX-DOS , para poner luz so- 
pre esta importante herramienta. 


n este numero analizaremos el 

I JHBSjtema del control de archivos. 

a 

| iVCCESO DE ARCHIVO 


' FCB (File Control Block - Bloque de 
Control de Archivo). 


Duando se utiliza la information almace- 
nada en el area del directorio permite tra- 
:ar los datos como “archivos”. 

La ventaja de este metodo consiste en 
que la ubicacion de los datos no se repre- 
senta con un numero absoluto tal como 
un numero de sector o cluster; en cam- 
oio, el archivo se puede especificar por 
su “nombre”. 

El programador solo necesita especificar 
el nombre de archivo y el sistema hara to- 
do el trabajo relacionado con el acceso al 
archivo requerido. En otras palabras, el 
programador puede desentenderse de la 
ubicacibn del archivo (en sectores) den- 
tro del disco. En este caso, el FCB juega 
un papel importante con los directorios. 
El FCB es el area donde se almacena la 
informacion requerida para manejar ar- 
chivos usando las llamadas al sistema. 
Para manejar un archivo se requiere 37 
bytes de memoria por cada uno, como se 
ve en la Figura 1 . A pesar de que el FCB 
se puede colocar en cualquier position 
de memoria, la direction 005Ch es la que 
utiliza normalmente el MSX-DOS. 


; Veamos la description: 

J* Numero de drive (OOh) 

: Indica la unidad de discos que contiene el 
: archivo. 

< Se describe asf: 

I 0 = Unidad activa 

* 1 * Unidad A: 

j 2 = Unidad B: 

/ 

* Nombre de archivo (01 h a 08h) 

* Un nombre de archivo puede tener has- 



ta 8 caracteres. Cuando tiene meno:; de 
8caracteres, el resto se completacori es- 
pacios (caracter 20h). 

* Extension (09h a OBh) 

La extensibn puede tener hasta 3 carac- 
teres. Cuando tiene menos de 3, el resto 
se completa con espacios. 

* Bloque en uso (OCh a ODh) 


madas al sistema 14h, 15h, 21 h, 27h, 
28h) 

* Tamano del archivo (lOh a 13h) 

Indica el tamano del archivo en bytes. 

* Fecha (1 4h a 15h) 

Indica la fecha de la ul'tima vez que se 
grabo el archivo. El forrnato es el mismo 
utilizado en el directorio. 


Indica el numero de bloque que esta 
siendo referido actualmente por un acce- 
so secuencial (ver la llamada al sistema 
14h y 15h). 

* Tamano del registro (OEh a OFh) 

Especifica el tamano de la unidad de da- 
tos (registro) que sera leldo o grabado 
cuando se acceda, en bytes (ver las lla- 


* Hora (1 6h a 17h) 

Indica la hora de la ultima vez que se gra- 
bo el archivo. El forrnato es el mismo uti- 
lizado en el directorio. 

* ID del dispositive/ (18h) 

Cuando se abre un periferico como archi- 
vo, el valor indicado en latabla 1 se espe- 


cifica en este campo ID del dispositivo. 
Para los archivos normales de disco, el 
valor de este campo es 40h + numero de 
drive. Por ejemplo, el ID del dispositivo 
para el drive A es 40h (para futuras ex- 
pansions, los programas de aplicacibn 
no deben utilizar este byte de ID). 

Tabla 1 - ID de dispositivo 

Nombre dispositivo ID 
CON (Consola) OFFh 

PRN (Impresora) OFBh 

LST (List=lmpresora) OFCh 
AUX (Auxiliar) OFEh 

NUL (Nulo) OFDh 

* Ubicacion del directorio (19h) 

Indica el orden de las entradas de direc- 
torio de un archivo en el brea de directo- 
rio. 

* Cluster tope (1 Ah a 1 Bh) 

Indica el clustertope del archivo en el dis- 
co. 

* Ultimo cluster accedido (ICh a IDh) 

Indica el ultimo cluster del archivo al que 
se accedio. 

* Ubicacibn relativa desde el clustertope 
del ultimo cluster accedido (1Eh a IFh) 

Indica la ubicacion relativa desde el clus- 
ter tope hasta el ultimo cluster accedido. 

* Registro actual (20h) 

Indica el registro que estb siendo accedi- 
do actualmente referido al acceso se- 
cuencial (ver llamadas al sistema 14h y 
15h) 

* Registro random (21 h a 24h) 


Especifica un registro a ser accedido por 
el acceso random o por el acceso a blo- 
que random. Especificando un valor de 1 
a 63 para el campo de tamaho de regis- 
tro descripto anteriormente provoca la u- 
tilizacion de los cuatro bytes desde 21 h a 
24h, teniendo los bytes desde 21 h a 23h 
signif icado s6lo cuando el tamano del re- 
gistro es mayor que 63 (ver llamados al 
sistema 14h, 15h, 21 h, 22h, 27h, 28h) 

* Abriendo un archivo 


Se requiere un procedimiento especial 
para abrir un archivo usando FCB. “A- 
briendo un archivo” significa, a nivel de 
llamadas del sistema, transformando un 
FCB incompleto cuyo campo de nombre 
de archivo es lo unico definido a un FCB 
completo, usando la informaci6n escrita 
en el directorio. 

La Figura2muestraladiferenciaentreun 
FCB sin abrir y otro abierto 

* Cerrando un archivo. 


Figura 1 - Organizacion del FCB 


FCB 

Bytes desde el 
tope 

* — * 

! 01 
♦ — * 

: l j 


Nilrner o de dr i ve 


! 11 ! 
♦ — * 
1 12 ! 

! 13! 
* — * 
! 14! 

! 15! 

:4c * 

! 16! 

! ■ I 


Nombre de archivo 

nombre .... 8 bytes 
extensidn.. 3 bytes 


Bloque en uso 

cant i dad de bloques desde el tope del 
archivo hasta el bloque en uso 
Tamano del registro 
1 a 65535 " 

Tamano del archivo 
1 a 4294967296 


Fecha 

Con el m i smo formato del 


! 19! 

* — * 

! 20 ! 
i 21 ! 

* — * 

! 22 ! Hora 

! 23 1 Con el mi smo formato del 
* — * 

» 24 I 
* — * 

! 25 ! 

He — H« 

» 26 ! 

127! 

He H< 

! 28 ! 

! 29 ! 

H« H< 

! 30 ! 

! 31 ! 

H< He 


d i rector i o 
d i rector i o 


IB de d i spos i t i vo 

Ubicacibn del directorio 

Ntimero de cluster tope del archivo 

Ultimo cluster accedido 


Ubicacibn relativa desde el cluster tope del archivo 
Cantidad de clusters desde el tope del archivo hasta 
el Ciltimo cluster accedido 
! 32 I Registro actual 
h« — * 

! 33 ! 

I . j Reg i stro random, A . 

» . i Oraen del registro respecto del tope del archivo 

! .! Normalmente almacena el Ciltimo registro al que se 

!36l accedib en forma directa. 

* — * 


Nota: 


€i uso del FCB arn depenaienoo sr 
se utilizan las llamadas al sistema compatibles 
con CP/M o las llamadas al sistema adicionales. 
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Cuando un archivo se abre y escribe, el 
contenido de cada campo del FCB, como 
por ejemplo, el tamafio de archivo, tam- 
bibn se modifica. A menos que la infor- 
macibn del FCB sin actualizar se devuel- 
va al area del directorio, la informacion 
1 del directorio y el contenido actual del ar- 
I chivo puede ser diferente en el siguiente 
j acceso. 

I j Justamente, la operation de devolver el 
I FCB actualizado al directorio correspon- 
de al cierre de un archivo a nivel de liama- 
■ dos de sistema. 

* Acceso directo por bloques (Manejo de 
! archivos con registros). 

t 

I ‘ 

MSX-DOS posee dos llamadas al siste- 
■ ma con acceso directo: "RANDOM 
: BLOCK READ” y “RANDOM BLOCK 
WRITE” (Lectura directa de bloques y 
; Escritura directa de bloques). Con estas 
llamadas al sistema, un archivo se puede 
: dividir en unidades de datos de cualquier 
[ tamafio, que pueden manejarse median- 

: te numeros, como 0, 1, 2 desde el 

; principio. 

't Esta unidad de datos se denomina “re- 
■| gistro”. El tamano del registro puede ser 
j. cualquier valor mayor a un byte. Por lo 

Figura 2 - Antes/despues d 



tanto, se puede tratar a todo un archivo 
como un registro (acceso secuencial ex- 
tremo), tratar datos con un byte como un 
registro (acceso directo extremo), o tra- 
tar 1 28 bytes como un registro (estilo CP/ 
M), son todos posibles. 

En este caso, los campos FCB, “tamano 
de registro” y “registro random” se utili- 
zan para especificar un registro. El valor 
del campo “tamano del registro” es la 
cantidad de bytes en un registro. Los 
campos de registro random pueden te- 
ner cualquier cantidad de registros para 
ser accedidos. 

* Acceso secuencial (Manejo de archivos 
por registro de longitud fija + registro ac- 
tual + bloque actual). 

! abrir un FCB 


MSX-DOS puede tambien acceder de la 
misma forma que CP/M para poder man- 
tenercompatibilidad. Una forma esel ar- 
chivo secuencial que se maneja con “re- 
gistro actual” y “bloque actual”. Esto utili- 
za registros de longitud fija de 128 bytes 
como la unidad basica de datos. El acce- 
so al archivo se hace siempre desde el to- 
pe secuencialmente y el numero de re- 
gistros que fue accedido se cuenta en el 
campo del registro actual del FCB. El va- 
lor del registro actual se coloca en 0 
cuando flega a 128, y se Neva el acarre- 
o al campo de bloque actual. 

* Acceso random (manejo de archivo con 
registros de longitud fija + registro ran- 
dom) 

Un segundo metodo incluido para man- 
tenercompatibilidad con CP/M es un mb- 
todo de acceso directo usando campos 
de registro random. Se puede acceder a 
un registro en cualquier ubicacion, pero 
el tamafio del registro es fijo, de 128 
bytes. 

En el proximo numero finalizaremos con 
la investigacibn del MSX-DOS, e incluire- 
mos la lista de los llamados al sistema y 
un programa de ejemplo. 

Por Hugo Daniel Caro 
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de a 

0 

IS! 

1 

IS! 

2 

IS! 

3 

IS! 

4 

ISI 

5ft — 1+« 

5 

ISI 

6 

is: 

7 

ISI 

8 

ISI 

*♦<—>«< 

9 

is: 

\ 10 

is: 

s4»— >fc 

11 

is: 

12 


13 

• • 
»•« — *♦* 

14 


15 

>♦« — »♦* 

16 

• i 

i i 

5fC — * 

17 

1 1 
»♦« »*• 

18 

1 1 

19 

♦ — * 

20 

1 I 
* — * 

21 


22 

I 1 

*->4* 

23 

1 1 
>♦< — >♦< 

24 

1 1 

25 

I 1 

26 

I 1 

27 

I I 


28 I : 

29 1 ! 


Niimero de drive 


del 


30 i S 

31 l i 

32 I i 

33 i i 

34 J I 

35 I l 

36 ! I 


Despu^s de abrir 


*— ♦— 

0 !S! Ntimero de drive se 

convierte el activo 

(OOh) por el real^ 

(Olh a 08h) 

* 

1 I S I 

♦ ->4* 

2 ISi 

3 IS! 

*-* Nombre 

4 ! S * del 

archivo 

5 IS! 

* 

6 : s i 

7 IS! 

8 IS! 

9 IS! 

10 ISI 

11 ISI v 



12 I I 

Bloque actual 

13 I I 


14 I I 

*-* Tamano del registro 

15 I I 



16 IS! ~ 

*-* I 

17 IS! 

Tamano del archivo 

18 IS! 

I 

19 IS! v 



20 IS! 

*-* Fecha 

21 IS! 



22 IS! 

Hora 

23 ISI 

* 

24 A§i_IP_^ el dispositivo 

25 ISI Ubicacidn en directorio 

*— * — 

26 IS! 

Cluster tope del archivo 

27 IS! 



28 IS! 

Ultimo numero de cluster 
acced i do 

29 IS! 



30 is: 

Ubicacidn relativa desde 
el cluster tope del archivo 


31 


IS! 


32 l I Registro actual 



33 I I ~ 

| 

34 I I 

Registro random 

35 I I 

S 

36 I I v 
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Se t eado 


No seteado 
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ORTILEGIOS 


PROGRAMA 1 


COMMENT * 

COMANDO EXTERNO PARA CARGAR 
EL SISTEMA CP/M DESDE EL 
MSX-DOS PARA SUI-707. 

R. C. D i c i emb re 1987 

* 

.280 

LD 
LD 
LD 

LOIR 
JP 

INICs LD 
LD 

CALL 
LD 

LOOP : CALL 

CP 
JR 
LD 
OUT 
LD 
LD 
RST 

MENS : DEFM 

DEFM 
DEFM 

FIN: 

END 


PROGRAMA 3 


* COLOR.CMD 

* Esta rutina es utilizable en dBASE II 
STORE 'COLOR' TO COLOR 

POKE 43100,243,62,1,33,233,243,119,35,62,7,119,35,119,253,42,192 
POKE 43116,252,221,33,98,0,205,28,0,251,201 
SET CALL TO 43100 
CALL COLOR 
RETURN 
; COLOR. MAC 

;Esta rutina es compilable. Genera un archivo COLOR.COM 
;ejecutable en el MSXDOS . 


. Z80 






ASEG 



ORG 

0100H 


CHGCLR 

EQU 

0062H 


CALSLT 

EQU 

001CH 


EXPTBL 

EQU 

0FCC1H 


t 

DI 




LD 

A , 1 

;Color frente negro 


LD 

HL , 0F3E9H 



LD 

(HL ) , A 



INC 

HL 



LD 

A, 7 

;Color fondo cyan 


LD 

(HL) , A 



INC 

HL 



LD 

(HL) , A 

;Color borde cyan 


LD 

IY , (EXPTBL-1 ) 

;Slot de la main ROM 


LD 

IX, CHGCLR 

;Subrutina change color en ROM 


CALL 

CALSLT 



El 




RET 




END 




HL, INIC 

: traslado del nucleo 

DE.8000H 

: del programs a pa- 

BC.FIN-INIC+1 

; gina 2, slot 1 

8000H 


DE, MENS 


C. 9 

; rut ina 'STRING OUT' 

5 


C, 8 

: rut ina 'DIRECT INPUT 

5 


13 


NZ, LOOP 


A.5CH 

: pagina 1, slot 3 

C0A8HD.A * 


A.0FFH 


C7FBEHD , A 

: 'I/O po rt d r i oe ' 

0 

; 'warm boot' 


'Introducir un disco con el si sterna CP/M' , 10, 13 
'y pulsar ''ENTER'' para cargar lo ' , 10, 13 
'o "CTRL-C" para sal i r' , 10. 13, 



£Como cargar el CP/M 
desde el MSX-DOS 
para la disquetera 
SVI-707? 

La disquetera SVI-707 posee en su ROM 
un “booter” para la carga del sistema o- 
perativo CP/M 80, el cual solo trabaja al 
encender la maquina. 

En la serie de comandos externos que se 
incluyen en el disco de este sistema hay 
uno (el GOMSX.COM) que permite car- 
gar el MSX-DOS desde el CP/M. 

Los programas 1 y 2 permiten “reboote- 
ar” el CP/M desde el MSX-DOS o desde 
el BASIC sin necesidad de apagar y en- 
cender la computadora. 

El listadodelprogramal tuncionabajoel 
MSX-DOS como comando externo (ex- 
tension .COM). Debe ser ensamblado 
con el Macro-80 y luego reubicado en la 
direccion hexadecimal 100 con el Link- 
80. 

El segundo programa trabaja en la me- 
moria altadelamaquinay puedesercar- 
gado desde el BASIC mediante BLO- 
AD”nombre”,R 

(Colaboracion de Roberto C. Civitillo) 

;Como cambiar de 
color en DBASE II? 

Esta rutina permite cambiar el color de 
frente y de fondo como parte de un pro- 
grama en DBASE II. 

Como se sabe, el DBASE II no tiene una 
instruction que lo haga, por lo que esta 
pequena rutina en codigo maquina pue- 
de insertarse como parte de cualquier 
programa o invocarla desde el DBASE II 
como DO COLOR. (Ver programa 3) 
Mas abajo puede verse el listado 3 de- 
sensamblado de esta rutina. La unica di- 
ferencia entre ambas es que en DBASE 
II el programa corre a partir de la direc- 
cion 431 00 (decimal) y el otro a partir de 
0100 (256 decimal) y que es compilable 
para crear el archivo COLOR.COM 
(Colaboracion del Ing. Carlos Atashian) 


PROGRAMA 2 



ORG 

0D000H 

CP 

13 \ 




JR 

N2.L2 


LD 

HL. MENS 

LD 

A.5CH : pagina 1, slot 3 . 

LI : 

LD 

A. CHLD 

OUT 

C0A8HD.A 


CP 

*$* 

LD 

A.0FFH 


JR 

Z,L2 

LD 

C2FBEHD , A ! ’I/O port drive* j 


RST 

18H 

RST 

0 : ‘warm boot* ; 


INC 

HL 




JR 

LI 

MENS : DEFM 

'Introducir un disco con el sistema CP/M' \ 

L2 : 

CALL 

9FH 

DEFM 

* y pulsar ’ * ENTER* * para cargarlo' f 


CP 

3 

DEFB 

10,13 


RET 

2 

DEFM 

*o *’ CTRL-C** para s<alir$* 


D I A 


PHANTIS 



catar al prisionero. En cada 
nivel nos aguardan diferen- 
tes peligros. Deberemos a- 
travesar la superficie, la base 
alienigena, el bosque subte- 
rraneo y el lago 
interior para lie- 
gar al nivel 
MAGMA. Alii 
cruzaremos 
con un helicop- 
tero lazonavol- 
canica para lie- 
gar al nivel pri- 
sion. Cuando 
desintegremos 
alosdiablosro- 
jos que custo- 
dian la milena- 
ria carcel pre- 
senciaremos el final de 


La Comandante Serena tie- 
ne por mision rescatar a su 
companero de expedicion 
capturado en la Luna 4 del 
sistema SOTPOK, mas co- 
nocido como el mundo de 
PHANTIS, un paraje insolito 
habitado por unafauna hostil 
y una flora exhuberante. 

Este programatiene dos par- 
tes, cada una grabada en una 
de las caras de la cinta. Para 
jugar a la segunda, es nece- 
sario descubrir el codigo de 
acceso que se encuentra al 
terminar la primera. 

En la etapa inicial hay cuatro 
fases en donde el objetivo es 
aterrizar en el plane- 
ta y atravesar el pan- 
tano sobre el lomo 
de un ADREC CLO- 
NICO. 

La primera fase es 
de aproximacion al 
planeta. En la segun- 
da se sobrevuela el 
area volcanica. En la 
tercera se penetra 
por un pasaje subte- 
rraneoqueseconec- 
ta con el pantano y, 
finalmente, en la 
cuarta hay que ate- 
rrizar y capturar un 
ADREC con el que 
podremos atravesar 
el pantano. 

En la segunda etapa hay que 
descender a lo rrtcis profundo 
de PHANTIS y atravesar seis 
niveles diferentes hasta res- 


PHANTIS. 

Existen 24 enemigos diferen- 
tes en PHANTIS. Porcada u- 
no que matemos obtendre- 
mos cierta cantidad de pun- 
tos. En la primera etapa con- 
tamos con 4 vidas y una extra 
cada 25000 puntos. En la se- 
gunda se comienza con 5 vi- 
das y se obtiene una extra 
por cada corazon encontra- 
do. (MICROBYTE) 


HOWARD THE 
DUCK 


Una aventura en la isla de 
Vulcano 

Howard se halla en Vulcano. 
El reloj que se encuentra en 
la parte inferior de la pantalla 


muestra cuanto tiempo ha de 
transcurrir hasta que Vulca- 
no entre en erupcion. Tene- 
mos que conseguir que Ho- 
ward encuentre su equipo, 
derrote a varios mutantes, 
venza al Oscuro Overlord y 
rescate a Beverly y a Phill del 
interior de Vulcano. 

Howard debe recoger su e- 
quipo saltando por sobre el 
pantano y atravesando la is- 
la. Este equipo contiene un 
jet solar para cruzar canales, 
un ultraligero para llegar a la 
cumbre de la montana volca- 
nica y un desintegrador de 
neutrones portatil que le ayu- 
dara a enfrentarse contra el 
Oscuro Howard. 

Con el jet solar cruzamos el 
canal y apareceran los mu- 
tantes en la otra orilla. 

A ellos los debemos derrotar 
con el quack-fu. Una patada 
a un mutante lo hiere y hace 
girar. Cuando esta girando, 
se lo golpea de nuevo y el e- 
nemigo desaparece de la is- 
la. 

Cuando se atraviese el rio y 
se elimine a los mutantes ha- 
bra que cruzar un puente col- 
gante. 

Luego Howard vivira otros 
peligros y aventuras antes de 
llegar frente al oscuro Over- 
lord. Hay que acabar con 61 y 
luego desactivar el volcan 
antes de que explote. (MI- 
CROBYTE) 


POOYAN 

Con arco y flechas debemos 
evitar que nos inVadan los 


plowis. Estos son unos bichi- 
tos de aspecto simpatico.pe- 
ro muy peligrosos. 

Si dejamos que desciendan, 
se treparan por las escaleras 
y nos golpearan, quitando- 
nos una vida. 

Tambien nos disparan pro- 
yectiles mientras descienden 
(y tienen buena punterfa). 
Sinoslleganadarconunade 
esas piedras tambien perde- 
remos vidas. 

La invasion se produce si de- 
jamos que los globos lleguen 
al suelo. Por lo tanto debe- 
mos disparar con nuestro ar- 
co tratando de pinchar esos 
globos. Disponemos de dos 
clases de proyectiles: las fle- 
chas comunes y una cadena 
que aparece cadatanto y que 
nos permite eliminar a varios 
plowis juntos. T ambien pode- 
mos ascender o descender a 
nuestro antojo con el ascen- 
sor. 

Una vez finalizado el primer 
nivel se pasa a otro en donde 
los plowis tratan de alcanzar 
lo alto de la pantalla para em- 
pujar una piedra y hacerlaca- 
er sobre nuestra cabeza. 

Asi se siguen sucediendo los 
niveles. Cada dos tendremos 
unarondade bonus en laque 
nos dedicaremos a obtener 
la mayor cantidad de puntos 
posibles. (REAL TIME) 


TENTH 

FRAME 

Este software es el mejor cs 
los simuladores del juego cs 









Bowling hecho hasta el pre- 
sente. Pueden jugar hasta o - 
cho participantes, con dos 
opciones: por equipos o indi- 
vidualmente. 


El juego se desarrc.lla con las 
reglas y elemental normales 
del bowling (bolas, grandes). 
Nosotros debemos determi- 
nar la posicion del. jugador y 
la direction del tiro. 

Una vez lograda l a ubicacion 
deseada tendrerrios que rea- 
lizar el tiro. Aqut hay que fijar- 
se en la velocidad (SPEED), 
y el efecto o gancho (HOOK). 
Para un tiro perfecto debe- 
mos pulsar el joystick dos vo- 
ces. Una, par a determinar la 
velocidad, en cuanto el indi- 
cador llegue a la zona delimi- 
tada en pantalla con SPEED. 
Si pulsamos fuera de esa zo- 
na, puede salir un tiro no de- 
seado. Paira el efecto el me- 
canismo es similar, solamen- 
te que ah ora hay que apretar 
elbotonen la zona de HOOK. 
Hay tres niveles de juego: 
Novicios (KIDS): 

Cuando se tira la 
bola la velocidad 
se establece au- 
tomaticamente y 
la bola ira recta si 
se manda sin gan- 
cho. 

Amateur: Los tiros 
dependen de la 
fuerz.a con que se 
mande la bola y el 
efecto que se le 
de. 

Profesional: Aqul 
la exactitud en el 
uso del indicador 


velocidad/efecto es muy im- 
portante. Cualquier error en 
esto incrementa la probabili- 
dad de un tiro malo. 

Por ultimo nos resta sehalar 
el procedi- 
miento em- 
pleado por 
los autores 
del programa 
para lograr 
los movi- 
mientos de 
los jugado- 
res. Se filmb 
el movimien- 
to de un juga- 
dor profesio- 
nal, y luego 
se traspasa- 
ron, cuadro 
por cuadro, 
los datos obtenidos a la com- 
putadora. Ese es el motivo de 
que nos parezca tan real es- 
te juego. (MICROBYTE) 


FUZZBALL 

Hay que saltar de un cubo a 
otro, atraves de todos los cu- 
bos de la piramide. Lasuper- 
ficie de los cubos que ya ha- 
yamos visitado cambiar£ de 
color. 

Una vez terminada la tarea 
en una piramide se pasa a la 
siguiente. En los niveles su- 
periores hay que visitar dos 
veces cada cubo para tehirlo 
del color correct o. 

En cada piramide hay cuatro 
ascensores que nos serviran 
para escapar de las bolas 
que caen de arriba o de las 


serpientes. A partir del nivel 
cinco comienzan a aparecer 
otros enemigos mucho mas 
peligrosos. 

De vez en cuando aparece u- 
na pelotita azul. Si logramos 
interceptarla congelaremos 
a nuestros enemigos durante 
algunossegundos. Esetiem- 
po lo debemos aprovechar 
para completar la piramide. 
Los puntos se obtienen de di- 
versas formas. 1 0 puntos por 
cada salto, 50 por cada as- 
censor que no se use cuando 
la piramide este completa, 
1 00 puntos por cada pelotita 
azul que se intercepte, 250 
por interceptar al “mocoso de 
al lado” (un pequeno que se 
obstina en deshacer nuestro 
trabajo). Finalmenteseobtie- 
ne un puntaje por completar 
cada piramide: 1000 por la 
primera, 1500 por la segun- 
da, 2000 por latercera, etce- 
tera. 

Se logra una vida extra a los 
1 0000 puntos y, a partir de a- 
lli cada 20000 puntos. (MI- 
CROBYTE) 


M A R T I A - 
NOIDS 

Despues de un largo viaje ru- 
tinario, MAKRON es atacado 
repentinamente por unos 
barbaros alienigenas llama- 
dos MARTIANOIDS. Nues- 
tra nave queda invadida por 
estos seres, afectando la 
transmision de los progra- 
mas al cerebro de la nave, y 
bajando peligrosamente el 


nivel de la baterla al intentar 
los enemigos nuestra des- 
trucci6n. 

Sus armas de fotones pasan 
por las partes internas del ce- 
rebro, destruyendo casi to- 
dos los componentes acti- 
vos. 

Nuestra tarea es llevar el pro- 
grama desde el transmisor 
hasta el receptor en cada 
sector. Cuando se recibe un 
programa se activan las de- 
fensas internas, impidiendo 
mayores dahos en esa sec- 
cion del cerebro. Hay que te- 
ner cuidado con los conduc- 
tos de ventilation, ya que los 
programas se pueden caer 
por uno de esos conductos, y 
perderse para siempre. 

Hay que reparar los compo- 
nentes activos dahados u- 
sando los conos de repuesto. 
Hay pilas de repuesto por do- 
quier, para usar cuando la 
carga baje a niveles peligro- 
sos. 

Para defendernos tenemos 
lasers que destruyen pare- 
des internas, componentes 


activos, conos de repuesto y 
alienigenas. En la pantalla se 
nos muestra un mapa con 
nuestra posicion, la del pro- 
grama y la situacidn de cada 
sector. 

El rojo indica un sector des- 
truido y el bianco, uno activo. 
El rojo y amarillo parpadean- 
te, un sector que esta siendo 
atacado. Tambien aparecen 
mensajes que nos indican 
que esta pasando en el cere- 
bro. (REAL TIME) 
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Para comunicarse con nosotros 
deben escribimos a "Load MSX", 
Parana 720 ,5 2 Piso, (1017), 
Capital Federal. 


MSX 

COMANDANTE 

‘ 

En el ntimero de dlciembre 
se publicb una nota qua in- 
clufa una llsta de materia- 
les y circuito para la cons- 
truccibn de una interfase. 
Lamentablemente dlcho 
piano era demaslado in- 
complete para que un prln- 
cipiante aficionado a la e- 
lectrbnica lo entendiera. 
De ser poslble reimpriman 
el piano complete, con nb- 
meros de terminates. En el 
piano aparecia un terminal 
del slot designado como 
WA, ^corresponds al WAIT 
j o deb!6 ser WR (WRITE)? 

Horacio Morazzo 


Load MSX 

. 

il 

El esquema publicado tiene 
li caracter informativo sola- 
mente, no pretende ser una 
jl nota de aplicacion. No obs- 
tante, para los mbs avanza- 
! dos en el tema, resulta una 
guia de aplicacibn e imple- 
mentacibn electrbnica. Pese 
; a ser un circuito muy sencillo 
y elemental, requiere cierta 
experiencia en el manejo de 
perifericos de desarrollo pro- 
pio y, por lo tanto, no es reco- 
mendable encarar su arma- 
do como primer proyecto. A 
j modo informativo diremos 
que los datos de cada uno de 
estos usuales circuitos inte- 
grados pueden solicitarse en 
las casas mbs importantes 
del ramo electrbnico que ge- 
neraimente disponen de los 
j manuales de datos corres- 
pondientes. Efectivamente, 
el terminal rotulado WAdebe 
j ser el WR (write), ya que se 
encarga de determinar la di- 
reccibn en que fluyen los da- 
'■ tos, esto es, del computador 
a la interfase o viceversa. 

( Pbg.34 


ORDENAMIENTO 

LENTO 


He copiado el programs de 
la revista Nro. 9 pbgina 28, 
y cuando pido el listado al- 
fabbtico, tarda como cinco 
minutes en dar el listado 
con 70 fichas de 6 items. 

1 )&Cbmo podrla hacer para 
acelerar el listado? 

2) &Quisiera saber por qub 
Megan tan tarde las revistas 
a mi ciudad? 

3) He copiado el slntetiza- 
dor de voces de la K64; 
quiero saber cbmo se pue- 
de hacer para agregarle o- 
tro programs en el que la 
computadora contests lo 
que uno le pregunte. 

Roberto Oscar Soria 
Mar del Plata 

Load MSX 

La clave para acelerar el lis- 
tado reside en optimizar la ru- 
tina que realiza el ordena- 
miento, ya sea transforman- 
do la misma o reemplazbn- 
dola por otra mbs rbpida sin 
descartar la alternativa del 
lenguaje de mbquina. 

El retraso en la llegadade las 
revistas ya ha sido hablado 
con nuestros distribuidores y 
esperamos que sea corregi- 
do a la brevedad. 

Un programa que contests 
preguntas efectuadas en for- 
ma oral a la computadora o- 
cuparla muchfsimo espacio 
de memoria si se pretende u- 
na respuesta mbs o menos 
coherente, ya que adembs 


de una base de conocimien- 
tos debe existir un hardware 
y/o software analizador sin- 
tbctico de nuestras palabras. 
En conclusibn, conformemo- 
nos viendo las fantasias (no 
tan lejanas) por television y 
cine. 

HARDCOPY 

Hemos recibido varias cartas 
con referenda al articulo so- 
bre la rutina de copia de pan- 
talla publicado en febrero pa- 
sado. 

Debemos irecordar que en el 
mismo se especifica el tipo 
de imprejjora (SEIKOSHA 
GP 550 A). Para verificar si 
este programa es compatible 
con otros modelos o marcas 
se deben comparar los co- 
mandos neoesarios para po- 
ner en modo grafico la impre- 
sora. Si estos no coinciden, 
se pueden cambiar en el pro- 
grama y as! adaptarlo. 

Para la impresora original los 
comandosi sonIBh, 39h, 
IBh, 56h, 30h, 30h que se 
encuentran en las lineas 
9C5D, 9C62, 9C98, 9C9D, 
9CA2 y 9CA7 en el listado 
desensamblado y en (1 ), (2), 
(3), (4), (5) y (6) en tos datas 

60008 DATA 3E, 0, 1,30, 0, 
2A, F8, F7„ BD, C2, 4F, 9C, 
21, 1,0, 9, 22, DB 

60009 DATA 9C, 21 , 0, 0, 3E, 
18, BC, C8, 22, DF, 9C, 3E, 
(1), CD, A5, 0. 3E, (2) 

60010 DATA CD. A5, 0, 11, 
0, 0, 3E, F0, BB, CA, C7, 9C, 
ED, 53, DD, 9C, 2A, DF 

60011 DATA 9C, 19, 11, El, 
9C.1, 8,0, CD, 59, 0.11,0,0, 


3E ,8, BB, CA 

60012 DATA BA, 9C, 21 , El , 
9C, 6, 8, 4E.CB, 11, IF, 71, 
2C, 10, F8, 47, 3E, (3) 

60013 DATA CD, A5, 0, 3E 
,(4) ,CD, A5 ,0, 3E, (5), CD, 
A5 ,0, 3E, (6), CD, A5, 0 

6001 4 DATA 3A, DB, 9C, CD, 
A5, 0, 78, CD, A5, 0,13, C3, 
84, 9C, ED, 5B, DD, 9C 
6001 5 DATA EB, 1, 8, 0, 9, 
EB, C3, 6A, 9C, 3E, D, CD, 
A5, 0, 3E, A, CD, A5 
60016 DATA 0, 2A ,DF, 9C, 
1,0, 1 ,9,C3, 56, 9C 

Los dos primeros correspon- 
den al ev.paciado entre lineas 
para modo grafico y el resto 
es la prodisposicibn para el 
modo grbfico; se deberan 
comparer con los que trae el 
manual de cada impresora y 
reemplazarlos si no coinci- 
diesen. 

De todos modos, para tos 
que no se atrevan a modificar 
tos bytes correspondientes, 
existe en el riiercado un utili- 
tario denomtinado GDUMP 
que realiza un hardcopy de 
pantalla en impresoras semi- 
profesionales. 

CONSULTA 

MEDICA 


Solicito de vuesttra gentile- 
za, me informed sobre el 
programa “HISTORIAS 
CLINICAS” de KAYAK. Me 
gustarfa saber el lugar de 
adquisicibn, medio en que 
estb grabado y pre cio. 

Dr Alberto Porto 
Rojas (Bs. As.) 

Load MSX 

Elmencionadosistema . e-s 
en disco. El represe-ta*'* 
exclusivo en todo el pa's - s- 
ce envios al interior) es - 
S.A., cuya direcc d~ ss 
French 3690 (Buencs i -es 
Tel: 72-0856 
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